ссылочная длинная переменная на ячейку листа

Question

Как связать переменную Long со значением, введенным в таблицу Excel? Я хочу создать большое количество строк, и хотя я могу изменить переменную непосредственно в коде (например, x = 100000), но как только я связываю переменную x с ячейкой (например, x = Cells (1,1), нет Кажется, значение распознано и напечатано в диапазоне.

Answer 1

Спасибо, что нашли время ответить на мой вопрос. Я нашел следующий подход, чтобы работать лучше всего для меня.

Sub test()

Dim x As LongLong
x = Worksheets("Sheet1").Cells(4, 2) 'e.g. value is 100.000 
range(Cells(1, 1), Cells(x, 1)).Value = "*" 'fill x rows with a * as a test

End Sub

Answer 2

Чтобы смоделировать ячейку, связанную с переменной, вам нужно добавить некоторый код, который запускается чем-то, чтобы записать его в ячейку.

Уменьшить значение переменной как Public или Global (вне подпрограммы, которая его устанавливает), чтобы другие подпрограммы могли «увидеть» ее значение:

Public x as Long

, а затем добавить код, который устанавливает его значение, на лист в событии Worksheet_SelectionChange или событие Worksheet_Change (в зависимости от того, как вы хотите, чтобы оно работало):

Cells(1, 1) = x

Если вы пытаетесь установить переменную автоматически, то здесь все наоборот. Добавьте это к событию WorkSheet_Change:

If Target.Row = 1 and Target.Column = 1 Then 
    x = Cells(Target.Row, Target.Column)
End If