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

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

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

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

您可以運行以下 VBA 代碼來通過點擊命令按鈕插入一個新的空白行。請按照以下步驟操作。

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

2. 然後在需要添加新行的工作表中繪製一個命令按鈕，右鍵單擊該命令按鈕並從右鍵菜單中選擇 屬性。

3. 在 屬性 對話框中，在 分類 標籤下的 標題 框中輸入命令按鈕的顯示文字，然後關閉對話框。

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

4. 再次右鍵單擊該命令按鈕，然後從右鍵菜單中選擇 查看代碼。

5. 接著在 Microsoft Visual Basic for Applications 窗口中，請用以下 VBA 代碼替換原始代碼並將其粘貼到 代碼 窗口中。

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

Private Sub CommandButton1_Click()
    Dim rowNum As Integer
    On Error Resume Next
    rowNum = Application.InputBox(Prompt:="Enter Row Number where you want to add a row:", _
                                    Title:="Kutools for excel", Type:=1)
    Rows(rowNum & ":" & rowNum).Insert Shift:=xlDown
End Sub

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

6. 同時按下 Alt + Q 鍵以關閉 Microsoft Visual Basic for Applications 窗口。並在 開發工具 選項卡下關閉 設計模式。

7. 點擊插入的命令按鈕，會彈出一個 Kutools for Excel 對話框。請輸入要添加空白新行的特定行號，然後點擊 確定 按鈕。參見截圖：

然後，空白的新行將被插入到工作表的指定位置，如下截圖所示。並且它保留了上方單元格的格式。

使用 Kutools AI 解鎖 Excel 的魔法

• 智能執行：執行單元格操作、分析數據並創建圖表——所有這些都由簡單的指令驅動。
• 自訂公式：生成量身定制的公式，簡化您的工作流程。
• VBA 編碼：輕鬆編寫和實現 VBA 代碼。
• 公式解釋：輕鬆理解複雜的公式。
• 文本翻譯：打破電子表格中的語言障礙。

通過人工智能工具增強您的 Excel 能力。立即下載，體驗前所未有的效率！

相關文章：

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