скопировать из справочного кода, но при попытке использовать дал ошибку

Question

код, который я скопировал:

With Worksheets(1).Range("e5").AddComment
 .Visible = False
 .Text "reviewed on " & Date
End With

при отладке в 3-й строке выдает синтаксическую ошибку. Ну, это место помощи MS, и оно должно работать. Моя версия Excel - Office365, поэтому предполагается, что она часто используется в Windows 10 64 ... есть предложения? Я скопировал этот код из https://docs.microsoft.com/es-es/office/vba/api/excel.comment

Answer 1

Эта веб-страница использует несовместимую code widget.

Заменить & на &.

& - HTML-код для &

With Worksheets(1).Range("e5").AddComment
    .Visible = False
    .Text "reviewed on " & Date
End With