Как исправить ошибку «индекс вне диапазона» в простом коде

Question

Я начинаю учиться писать коды VBA с помощью книги VBA для чайников.Есть этот код, который я буквально копирую и вставляю из книги, но он выдает мне ошибку.

Не могли бы вы помочь?

Sub ShowValue()

    Contents = Worksheets(“Sheet1”).Range(“A1”).Value
    MsgBox Contents

End Sub

Answer 1

Угадаю, поскольку это простой макрос, но используемые вами кавычки (при условии, что мы видим здесь именно то, что содержится в коде вашего модуля / листа) могут не работать с VBA.

Sub ShowValue()
Dim contents As String
    contents = Worksheets("Sheet1").Range("A1").Value
    MsgBox (contents)
End Sub

Насколько@KenWhite спрашивает где ваш код, он либо в рабочем листе, либо в модуле.Я поместил вышеупомянутое в Рабочий лист, который Вы можете видеть в окне VBEditor.