エクセルVBAについて

C列からH列に値が入っています。
C列からH列のセルの値が変更されたとき
I列に更新日を入れるマクロを作成しました。

Private Sub Worksheet_Change(ByVal Target As Range)

Dim MyRng As Range, R As Range
Dim LastUpdated As Integer

Set MyRng = Intersect(Target, Range("C11:H99999"))
If MyRng Is Nothing Then Exit Sub

LastUpdated = 9

For Each R In MyRng.Rows
Cells(R.Row, LastUpdated).Value = Date
Next

End Sub

このマクロだと、C列からH列の値を削除したときもI列が変更されてしまいます。
これを、C列からH列すべての行が空白の時はI列も空白にするというマクロを組むにはどこをどのように変更したらいいでしょうか？
アドバイスお願いいたします。

No.1 回答者： fujillin 回答日時： 2020/07/01 12:38

こんにちは

若干要領は悪いかも知れませんが…

現在は、無条件で日付を記入しているところを、
その行のC~H列をチェックして、全部空白なら空白に、そうでなければ日付を記入
という処理に変更すれば良いのではないでしょうか？