如何通過Excel中的“命令按鈕”自動插入空白新行

發布:未知文本批量工具

如何通過Excel中的“命令按鈕”自動插入空白新行？

在許多情況下，您可能需要在工作表的指定位置插入一個空白的新行。在本文中，我們將向您展示如何通過在Excel中單擊命令按鈕來自動插入空白新行。

通過命令按鈕自動插入空白新行

您可以通過單擊命令按鈕來運行以下VBA代碼以插入空白的新行。請執行以下操作。

1.首先，您需要插入一個命令按鈕。請點擊 開發商 > 插頁 > 命令按鈕（ActiveX控件）。看截圖：

2.然后在需要添加新行的工作表中繪制一個“命令按鈕”，右鍵單擊“命令按鈕”并單擊租房從右鍵單擊菜單中。

3.在租房對話框中，將命令按鈕的顯示文本輸入到標題下框分類選項卡，然后關閉對話框。

您可以看到命令按鈕的顯示文本已更改，如下圖所示。

4.再次右鍵單擊“命令按鈕”，然后單擊“確定”。 查看代碼 從右鍵單擊菜單中。

5.然后 Microsoft Visual Basic應用程序 窗口，請將原始代碼替換為下面的VBA代碼代碼窗口。

VBA代碼：通過命令按鈕自動插入空白新行

Private Sub CommandButton1_Click()Dim rowNum As IntegerOn Error Resume NextrowNum = Application.InputBox(prompt:="Enter Row Number where you want to add a row:", _Title:="Kutools for excel", Type:=1)Rows(rowNum & ":" & rowNum).Insert Shift:=xlDownEnd SubCopy

備注：在代碼中，CommanButton1是您創建的命令按鈕的名稱。

6。按其他 + Q 同時關閉按鍵 Microsoft Visual Basic應用程序 窗口。然后關閉 設計模式 在下面 開發商 標簽。

7.單擊插入的命令按鈕，然后單擊 Kutools for Excel 對話框彈出。請輸入要在其中添加空白新行的特定行號，然后單擊 OK 按鈕。看截圖：

然后，將空白的新行插入到工作表的指定位置，如下圖所示。并且它保持上述單元格的單元格格式。

相關文章:如何在Excel中使用命令按鈕將活動工作表另存為PDF文件？如何在Excel中格式化單元格使其看起來像3D按鈕？如何根據Excel中指定的單元格值隱藏或取消隱藏命令按鈕？