Формула Excel VBA Перетаскивание

Question

У меня есть данные в столбце A в формуле столбца BI столбца и перетащите до конца данных, соответствующих столбцу A. Но проблема в том, что столбец A не является постоянным, каждый раз, когда он изменяется, поэтому, как сделать auto заполнить в соответствии с изменением данных?

Answer 1

Вы можете заполнить формулу на весь диапазон, не помещая ее в B2 и затем заполняя ее.

Cells(2, "B").resize(cells(rows.count, "A").end(xlup).row -1, 1).formula = "=A2" 

... или,

Range("B2:B" & cells(rows.count, "A").end(xlup).row).formula = "=A2"