如何在 Excel VBA 中插入行

在本文中，我将解释如何使用VBA（Visual Basic for Applications）在Excel中插入行。VBA 是一种编程语言，适用于在Excel和其他Office程序中工作的人员，因此可以通过编写所谓的宏来自动化Excel中的任务。使用VBA编码，我们可以执行Excel中执行的所有大多数任务，就像复制、粘贴、删除等一样。

插入行–用于在Excel中借助于自动化（即单击一次）在另一行之间插入一行。假设我们在Excel中输入员工详细信息，我们跳过了一些员工，并希望在其间插入缺少的员工的详细信息，因此我们必须创建一个空间并插入一行以输入他们的详细信息。我们可以自动执行使用VBA插入行和创建宏的任务，而不是逐个插入行。

有许多方法可以使用VBA编码插入行。用于在VBA中插入行的函数是：Range().Row().EntireRow.Insert

让我们考虑一下我们有一个数据集，它由客户、产品、销售、数量、运输成本、订单优先级等列组成。

假设我们需要将行向下移动以插入3到4之间的3个新行，以插入新的缺失记录。我们不会一行一行地插入，而是通过单击自动插入所有3行。

一、使用整行

1、要创建宏，我们需要选择“开发人员”选项卡。

2、打开“开发人员”选项卡后，从“控件”组中插入一个按钮。单击插入并从ActiveX控件中选择第一个选项。如你所见，命令按钮。

3、在任意单元格处拖动箭头以创建命令按钮。

4、要进入插入功能，右键单击Comand按钮，如“插入3行”，然后单击查看代码。

5、单击查看代码时，将显示以下代码。

Private Sub CommandButton1_Click()
End Sub

6、我们必须编写INSERT ROW代码。如前所述，我们必须在VBA中使用Rows.EntireRow函数和RANGE。在这段代码中，我们必须在第3和第4之间插入3。

Private Sub CommandButton1_Click()Range("A3").Rows("3:5").EntireRow.InsertEnd Sub

7、单击“插入3行”命令按钮运行代码。

二、使用行号

类似地，我们将编写一个代码，在单击按钮时插入2行。在这里，我们需要使用RANGE和INSERT从开始行到结束行编号，INSERT将插入行。

Private Sub CommandButton2_Click()Range("3:4").InsertEnd Sub

当我们单击“插入2行”按钮时，我们看到在第3行和第4行之间插入了2行。

三、使用活动单元格

活动单元格是指当前选定的单元格。我们将使用活动单元格插入行。假设我们在单元格B3上，并希望在其上方插入单元格，我们将使用活动单元格属性。我们将对活动单元格使用以下代码。

Private Sub CommandButton3_Click()ActiveCell.EntireRow.InsertEnd Sub

当我们点击“活动单元格”按钮时，我们会看到一个单元格被插入到所选单元格的上方。在上面，我们选择了B5，在下面我们可以看到在它上面插入了一行。

四、使用带偏移的活动单元格

假设我们想在活动单元格的3行之后插入一行，为此我们将使用OFFSET函数。假设我们在单元格B4中，必须在两行之后插入一行，我们将使用此代码。

Private Sub CommandButton4_Click()ActiveCell.Offset(2, 0).EntireRow.InsertEnd Sub