Ошибки метода Addcomment

Question

У меня проблема с функцией .AddComment

    Worksheets("Config").Range("I2:ZZ2").offset(index, 0).AddComment Worksheets("Library").Range("B2:ZZ2").offset(offset, 0).Value

Что я делаю не так? Я зацикливаюсь, поэтому утверждение «С» здесь невозможно.

Answer 1

Вы также должны пройти через каждый столбец:

for i = 9 to 702
    Worksheets("Config").Cells(2 + index, i).AddComment Worksheets("Library").Cells(2 + index, i).Value
next i