Переменная объекта Runtime-error или переменная не установлена - PullRequest
0 голосов
/ 04 мая 2018

Я получаю сообщение «Ошибка времени выполнения 91»: переменная объекта или переменная блока не установлена ​​»в следующем коде, и кажется, что я не могу понять, что не так.

Я установил следующие переменные:

Dim EngineAncillariesProjectsVBAList As Range
Dim EngineAncillariesProjectsLastRow As Long
Dim ProjectList As Range

которые определяются как:

EngineAncillariesProjectsLastRow = Worksheets("VBA_Data").Cells(Rows.Count, 8).End(xlUp).Row

Set EngineAncillariesProjectsVBAList = Worksheets("VBA_Data").Range("H2:H" & EngineAncillariesProjectsLastRow)

Ошибка наступает на следующем этапе, см. Ниже. В Debug говорится, что ProjectList = Nothing

If ActiveSheet.Name = "Engine Ancillaries" Then ProjectList = EngineAncillariesProjectsVBAList
...