Кто подкажет, почему у меня игнорирует условие, когда примечания нет ?
For i = 1 To 2
For j = 1 To 3
If Not Cells(i, j).Comment Is Nothing Then GoTo l
Cells(i, j) = Sheets("Лист2").Cells(i, j).Comment.Text
l: Next
Next
Stepler ^{(щёлк-щёлк!!)}

Пардон - зря засорял эфир !!!
Стормозил - делал проверку не на том листе SteplerКто подкажет, почему у меня игнорирует условие, когда примечания нет ?
For i = 1 To 2
For j = 1 To 3
If Not Sheets("Лист2").Cells(i, j).Comment Is Nothing Then GoTo l
Cells(i, j) = Sheets("Лист2").Cells(i, j).Comment.Text
l: Next
Next

Stepler ^{(щёлк-щёлк!!)}