excel - 根据单元格值添加行

我需要有关我正在处理的 Excel 文件的 Excel vba 编码方面的帮助。

我想在 vba 中编写一些代码，以便它根据单元格值将行添加到活动工作表中。
例如 - 如果单元格值（c14 值为 10）当单击“添加行”按钮时，VBA 在 C2 行之后添加 10 行。

如果单元格值（C14 为 15，则在 C2 行之后添加 15 行）。

添加行时想要从 C2 行复制格式（将格式从 c2 行复制到新行。

另外，我做了一封电子邮件 vba，它复制范围并将该范围粘贴到电子邮件中。

我可以添加什么 VBA 编码，以便在添加 10 或 15 个新行时自动调整要复制的范围的选择。

现在如果我手动插入 10 行 vba 正在复制Range("C2:C27") 它不会调整为复制Range("C2:C37")

标签： excelvba

这会有所帮助

Dim rowsToAdd as Integer
rowsToAdd = Range("C14").Value

Rows("2:2").Copy
Rows("3:3").Resize(rowsToAdd).Insert Shift:=xlDown