определить динамический диапазон в VBA

Question

У меня следующая проблема:

Я пытаюсь установить диапазон клиента равным динамически изменяющемуся диапазону.

В столбце AI, начиная с ячейки 131, у меня есть список клиентов, длина которого варьируется в зависимости от того, за сколько лет я загружаю данные. Я хотел бы установить диапазон с именем client равным этому диапазону переменных. Мой код на данный момент:

Sub range()

Dim client As range
Dim lastrow As Long
Dim startingcell As Long

Set startingcell = range("AI131")
lastrow = Cells(Row.Count, startingcell.Column).End(xlUp).Row
Set client = range(startingcell, Cells(lastrow, startingcells.Column))

End Sub

Это не работает, какие-либо предложения?

Спасибо

Answer 1

Похоже, что вы ошиблись из-за неправильного определения размеров и использования переменных.

Это будет использовать только As Range, что должно помочь решить проблему:

Dim startcell As Range, endcell As Range, client As Range

Set startcell = Cells(131, "AI")
Set endcell = Cells(Rows.Count, "AI").End(xlUp)
Set client = Range(startcell, endcell)