Как пройтись по всем ячейкам выделенного диапазона, у которых белый цвет? Вернее, в ячейке отсутствует цвет.
Ячейки разбросаны в тетрисном порядке, бессистемно.
Sub Макрос()
Dim Ячейка As Range
For Each Ячейка In Selection.Cells
If Ячейка.Interior.Pattern = xlNone Then
' Действие с ячейкой.
End If
Next Ячейка
End Sub
Круто! Благодарность огромная!