KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何在 Excel 中快速插入空白欄?

作者Xiaoyang修改日期

我們大多數人在使用 Excel 時,可能都曾遇到這樣的困擾:需要在現有每一列之間插入一列空白列。雖然手動插入一列空白列的方法大家都很熟悉,但若要處理數百列,逐一手動操作將極其耗時又繁瑣。以下提供幾個快速技巧,助您輕鬆解決此問題。

使用排序功能插入空白列
透過 Kutools for Excel 快速插入指定數量的空白列

使用 VBA 程式碼插入間隔空白列


使用排序功能插入空白列

此方法雖較簡單,卻稍顯迂迴,可用於在現有列之間插入空白列。操作步驟如下:

1. 請在資料旁邊預留一個空白欄位,例如我的工作表範圍為 A1:E9,即可使用 F 欄。

2. 在儲存格 F1 輸入數字 1,並在 F2 輸入數字 2.

3. 選取數字 1 與數字 2,然後雙擊填滿控點,Excel 將自動為您填滿 F 欄中的儲存格。

4. 接著複製新建立的 F 欄(F1:F9),選取儲存格 F10,然後貼上剛才自動填滿的數字(F1:F9)。請參見截圖:

在新欄位中填入數列

5. 接著點選資料> 排序,此時將彈出排序警告對話方塊,請選擇擴充選取範圍選項,再點選排序…… 請參見截圖:

在對話框中選取「擴充選取範圍」選項

6. 在出現排序對話方塊後,請從 1排序依據下拉列表中選擇數字,然後點選確定按鈕。請參見截圖:

在排序對話框中設定選項

此時,新的空白列已成功插入至現有列之間。請參閱截圖:

已在現有資料列中插入新的空白列

注意:若您希望在每列之間插入兩列或三列空白列,只需將自動填滿的新欄複製兩次或三次,即可快速新增所需列數!


使用 Kutools for Excel 快速插入指定數量的空白列

上述兩種方法僅適用於在每列之間插入空白列;若想在每第 n 列後插入一列或多列空白行,該如何操作?推薦您使用插入空白行/列工具(由 )Kutools for Excel 提供)!此工具能協助您在指定範圍內,於每第 n 列後快速插入指定數量的空白列。請依下列步驟操作:

Kutools for Excel 提供超過 300 項進階功能,簡化複雜作業,提升創造力與效率。整合 AI 功能,Kutools 能精準自動化各項任務,讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊……         免費試用……

1. 選取要插入空白列的範圍,然後點選 Kutools > 插入 > 插入空白行/列。請參見截圖:

點擊 Kutools 的「插入空白列與欄」功能

2. 在插入空白行/列對話方塊中,於空白列插入類型區段,指定作為間隔基準的列數與欲插入的列數,然後點選確定按鈕。請參見截圖:

>在對話框中指定選項

此時您可看到,指定數量的空白列已於每兩列後插入。請參閱截圖:

每隔特定數量的資料列後插入指定的空白列

注意間隔列數的數值可依需求自由調整。例如,您可在每 1、2、3…… 列後,插入 3、4、5…… 列空白列。

想免費試用此工具 30 天嗎?立即下載,並依照上述步驟操作!


使用 VBA 程式碼插入間隔空白列

若覺得上述方法稍嫌複雜,您也可以使用以下 VBA 程式碼輕鬆解決。

1. 按下 Alt + F11 鍵開啟 Microsoft Visual Basic for Applications 視窗,接著點選插入 > 模組,並將下列程式碼貼入模組中:

VBA 程式碼:在 Excel 中插入空白列

Sub InsertBlackRows()
'Updateby20131127
Dim Rng As Range
Dim WorkRng As Range
Dim FirstRow As Integer, xRows As Integer, xCols As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
FirstRow = WorkRng.Row
xRows = WorkRng.Rows.Count
xCols = WorkRng.Columns.Count
Application.ScreenUpdating = False
WorkRng.Cells(xRows, 1).Resize(1, xCols).Select
Do Until Selection.Row = FirstRow
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Selection.Offset(-1, 0).Select
Loop
Application.ScreenUpdating = True
End Sub

2. 接著點選執行按鈕執行按鈕或按下 F5 鍵執行程式碼。在彈出的 Kutools for Excel 對話方塊中,請選擇要插入空白列的範圍,然後點選「確定」按鈕。請參見截圖:

用於選取資料範圍的 VBA 程式碼

此時,新的空白列已插入每兩列之間。請參見截圖:

每兩列之間已插入一列新的空白列


相關文章

最佳 Office 生產力工具

🤖KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行     產生程式碼  建立自訂公式    分析資料並產生圖表  呼叫增強函數……
熱門功能尋找、醒目提示或標記重複值     刪除空白行     合併列或儲存格而不遺失資料     不使用公式的四捨五入……
高級 LOOKUP多重條件 VLookup    多重數值 VLookup     跨多個工作表 VLookup      模糊查找……
高級下拉列表快速建立下拉式清單     相依式下拉式清單     多選下拉式清單……
欄位管理員新增指定數量的欄位移動欄位切換隱藏欄位的可見狀態比較範圍與欄位……
精選功能網格聚焦     設計視圖   增強編輯欄    工作簿與工作表管理員     資源庫(自動文字)  日期提取     合併工作表    加密/解密儲存格    依清單傳送電子郵件     超級篩選      特殊篩選(篩選粗體儲存格/斜體/刪除線……) ......
頂尖 15 工具組12 文字工具添加文本刪除特定字符,……)   50+ 圖表 類型甘特圖,……)   40+ 實用公式基於生日計算年齡,……)   19 插入工具插入二維碼從路徑插入圖片,……)   12 轉換工具金額轉大寫匯率轉換,……)   7 合併和拆分工具高級合併行分割儲存格,……)……以及更多
在您的慣用語言中使用 Kutools—支援英文、西班牙文、德文、法文、中文及另外 40+ 種語言!

運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……


Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!

  • 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
  • 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
  • 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!

所有 Kutools 增益集,一個安裝程式

Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!

ExcelWordOutlookTabsPowerPoint
  • 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
  • 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
  • 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
  • 30 天完整功能試用— 無需註冊,無需信用卡
  • 超值之選— 比單獨購買各增益集更省費用