Vba 如何根据变量值自动填充单元格';n';

Vba 如何根据变量值自动填充单元格';n';,vba,function,excel,autofill,Vba,Function,Excel,Autofill,我正在计算单元格C1中的可变行数,需要在单元格B1中自动填充。例如,如果C1返回数字“3”,那么我需要将单元格B1向下自动填充三行 使用逻辑功能或VBA有什么方法可以做到这一点吗?将其放入B2并复制: Range("B1").Resize(Range("C1").Value,1).FillDown =IF(ROW()<=$C$1,$B$1,"") =IF(ROW())我还有一个问题要问你……我如何对VBA进行编码,以便从当前选定的单元格自动填充到最后一行?对不起,我是一个总VBA n0

我正在计算单元格C1中的可变行数,需要在单元格B1中自动填充。例如,如果C1返回数字“3”,那么我需要将单元格B1向下自动填充三行


使用逻辑功能或VBA有什么方法可以做到这一点吗?

将其放入B2并复制:

Range("B1").Resize(Range("C1").Value,1).FillDown
=IF(ROW()<=$C$1,$B$1,"")

=IF(ROW())我还有一个问题要问你……我如何对VBA进行编码,以便从当前选定的单元格自动填充到最后一行?对不起,我是一个总VBA n00b。向下填充到工作表中的最后一行?
范围(“B1”)。调整大小(Rows.Count,1)。填充