尝试插入空白行x次,x =单元格值

我试图插入一个特定数量的空行,这是基于一个单元格中的值。 单元格中的这个值是来自表格的计数函数。

我有一个“导入表”工作表,其中包含我所有的数据。 在表格旁边,我有几个计数函数,它们计算来自表格的一般类别。 例如,在“导入表格”工作表单元格J8(国内股票)中,单元格J9具有计数function,对于这种情况来到“11”。 我现在想在我的“分析”工作表的特定位置插入11行。 在这个工作表中,还有标题的名称,如计数标题(国内资产)。 因此,在国内公平的情况下,我希望行被插入。 在分析表中,已经在国内权益的第一行中创build了一个函数,所以在这种情况下,在第6行的下面插入新的空白行。

单元格(A6,B6,C6,D6,E6)中已经存在的公式必须被闪存填充到新创build的白色行中。

我附上了2张图片,希望能够澄清我的问题。

谢谢!

Range("A1").Resize(11, 1).Insert (xlShiftDown) 

要么

 Rows(1).Resize(11, 1).Insert (xlShiftDown)