|
Примечания...в Экселе
|
||
|---|---|---|
Участник
Откуда: Северная столица!? (Питер)
Сообщения: 1 385 |
||
|
Кто подкажет, почему у меня игнорирует условие, когда примечания нет ?
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 (щёлк-щёлк!!)  Код: plaintext |
||
| 13.09.2004, 12:20:00 |
|
|
|
Примечания...в Экселе
|
||
|---|---|---|
Участник
Откуда: Северная столица!? (Питер)
Сообщения: 1 385 |
||
|
Пардон - зря засорял эфир !!!
Стормозил - делал проверку не на том листе 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 (щёлк-щёлк!!) Код: plaintext |
||
| 13.09.2004, 12:27:52 |
|
|
