Excel VBA公式拖动

Question

我有列A中的数据，列BI填充公式，并拖动到数据结束对应于列A.但问题是列A不是恒定的，每次它改变，所以如何做自动根据数据变化填充？

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"