IsEmptyという関数を使います。
Sub セルが空なら() If IsEmpty(Cells(2, 1).Value) = True Then Cells(2, 1).Interior.ColorIndex = 6 End If End Sub
コメントする