Пишу код для отображения/скрытия примечаний:
Код
Private Sub tglRemark_Change()
If tglRemark.Value = True Then
ВидимостьПримечаний True
Else
ВидимостьПримечаний False
End If
End Sub
Sub ВидимостьПримечаний(Видимость)
For i = 2 To 7
Cells(i, 1).Comment.Visible = Видимость
Next i
End Sub
При запуске выскакивает ошибка Run-time error '91': Object variable or With block variable not set для строки
Cells(i, 1).Comment.Visible = ВидимостьКто-нибудь может подсказать причину ошибки?
Добавлено Sellf, Я скоро с этим языком смеяться перестану. Если закрыть и снова открыть книгу с макросом, все работает и ошибка исчезает.