weixin_43866749的博客

原创 VBA进行下拉填充

VBA下拉填充 如何利用VBA实现单元格计算的下拉填充代码实现如何利用VBA实现单元格计算的下拉填充针对每次行数不同的数据和计算公式，如何做到利用VBA对每次行数不同的计算进行下拉填充至最后一行。代码实现假设A1至A4存在数据，想在B列对A列数据进行autofill.Sub 宏1() Dim r As Long r = Cells(Rows.Count, "A").End(3).Row[B1].AutoFill Destination:=Range("B1:B" & r) E