處理 Word 文件時，在表格中新增行和列是一項常見任務，可以幫助您更有效地組織和呈現資訊。本指南提供了有關如何快速有效地在 Word 表格中新增行或列的詳細步驟。

將所選內容上方/下方的行新增至表格中

將列新增至表格中所選內容的左側或右側

使用 VBA 程式碼為表格新增多行

刪除行或列

將所選內容上方/下方的行新增至表格中

要在選定行的上方或下方添加行以容納其他數據，本節將指導您透過兩種簡單的方法將行添加到表中：使用「佈局」標籤和使用右鍵單擊上下文功能表。這兩種方法都很有效，可以根據您感覺更直觀的方式進行選擇。

步驟 1： 選擇要在上方或下方插入新行的行

• 按一下您要新增行的行或整行中的任何儲存格。
• 若要插入多個新行，請選擇您計劃新增的行數。例如，如果要插入三個新行，則應先在表中選擇三行。
  

步驟 2：套用「在上方插入/在下方插入」功能

• 方法1：選擇行後，轉到 佈局 標籤，選擇 插入上方 or 在下方插入 ，在 行和列 組。 看截圖：
  
• 方法2：右鍵點選所選內容，然後選擇 插入 > 在上方插入行 / 在下面插入行，請參見屏幕截圖：
  

結果：

這將在您選擇的上方或下方插入與您選擇的行數相同的行。看截圖：

• 在所選內容上方插入一行
  
• 在選擇後插入行
  

將列新增至表格中所選內容的左側或右側

本節詳細概述如何在 Word 表格中現有選取的左側或右側新增欄位。我們將介紹兩種主要方法：使用「佈局」標籤和使用右鍵單擊上下文功能表。

第 1 步：選擇要在左側或右側插入新列的列

• 按一下要新增列的列或整個列中的任何儲存格。
• 若要插入多個新列，請選擇您計劃新增的列數。例如，如果要插入兩個新列，則應先在表中選擇兩列。
  

步驟 2：套用「向左插入」/「向右插入」功能

• 方法1：選擇列後，前往 佈局 標籤，選擇 向左插入 or 右插入 ，在 行和列 組。 看截圖：
  
• 方法2：右鍵點選所選內容，然後選擇 插入 > 在左側插入列 / 在右側插入列，請參見屏幕截圖：
  

結果：

這將在所選內容的左側或右側插入與您選擇的相同數量的列。看截圖：

• 在所選內容的左側插入列
  
• 在所選內容的右側插入列
  

使用 VBA 程式碼為表格新增多行

當您需要在 Word 表格中新增比目前更多的行時，手動方法可能會很乏味。在本文中，我將向您展示如何使用 VBA 程式碼高效、快速地新增行。

步驟 1： 選擇要在上方或下方插入新行的行

按一下要新增多行的行或整行中的任何儲存格。

第 2 步：打開 VBA 模塊編輯器並複制代碼

1. 媒體推薦 Alt + F11鍵 鍵打開 Microsoft Visual Basic for Applications 窗口。
2. 在打開的視窗中，按一下 插入 > 模塊 創建一個新的空白模塊。
3. 然後，將以下任意程式碼複製並貼上到空白模組中。
   VBA程式碼：在所選行上方新增多行

   Sub Addrowsabove()
   'Updateby Extendoffice
       Dim lngIndex As Long
       Dim lngRowsToAdd As Long
       Dim lngPosit As Long
       Dim oTbl As Word.Table
       If Selection.Information(wdWithInTable) Then
           lngRowsToAdd = InputBox("How many rows?", "Kutools for Word", 1)
           Set oTbl = Selection.Tables(1)
           lngPosit = Selection.Rows(1).Range.Information(wdEndOfRangeRowNumber)
           For lngIndex = 1 To lngRowsToAdd
               oTbl.Rows.Add oTbl.Rows(lngPosit)
           Next lngIndex
       End If
   End Sub

   
   VBA程式碼：在所選行下方新增多行

   Sub Addrowsbelow()
   'Updateby Extendoffice
       Dim lngIndex As Long
       Dim lngRowsToAdd As Long
       Dim lngRowPosition As Long
       Dim oTbl As Word.Table
       If Selection.Information(wdWithInTable) Then
           lngRowsToAdd = InputBox("How many rows?", "Kutools for Word", 1)
           Set oTbl = Selection.Tables(1)
           lngRowPosition = Selection.Rows(1).Index
           For lngIndex = 1 To lngRowsToAdd
               oTbl.Rows.Add oTbl.Rows(lngRowPosition + lngIndex)
           Next lngIndex
       End If
   End Sub

第3步：執行程式碼

然後按 F5 鍵來運行程式碼。在彈出的對話方塊中，輸入要插入的行號，然後按一下 OK 按鈕。

結果：

程式碼將立即將指定數量的行新增至表格的指定位置（上方或下方）。

刪除行或列

如果你想從word文件中的表格中刪除行或列，在這裡，我將介紹一些簡單的技巧。

步驟 1：選擇表格中的整行或整列

• 透過將遊標移到表格的左邊距（該行第一個儲存格的外側）來選擇要刪除的整行。遊標將變為向右箭頭。當出現箭頭時按一下以選擇整行。
  
• 若要選擇列，請將滑鼠指標移到所需列的第一個儲存格上方，直到指標變成向下箭頭符號。然後，按一下以選擇整個列。
  

步驟 2：按退格鍵

媒體推薦 Backspace鍵 鍵立即刪除選定的行或列。

相關文章：