每月發薪資條需在每位員工資料前插入標題列。手動插入極慢，巧用「複製標題 → 補齊行數 → 編號排序」三步曲，幾秒鐘完成全表標題插入，再刪除輔助欄即得完美薪資條。

實戰案例：月薪資條批量加標題

原始資料：第 1 列為標題，第 2~11 列為 10 位員工資料。目標：每筆員工資料前插入一列標題，共產生 20 列（標題+資料交替）。

三步驟完成

步驟 1：複製標題列補齊行數

• 選取第 1 列標題 → Ctrl + C
• 計算需插入標題數：員工數 = 10 筆 → 需 10 列標題
• 在第 12 列起連續貼上 10 列標題

步驟 2：輔助欄編號建立排序規則

• 在 L 欄（輔助欄）對「標題列」填 1、3、5…（奇數），對「資料列」填 2、4、6…（偶數）
• 規律：標題列 = 2n-1，資料列 = 2n

步驟 3：依輔助欄升序排序 → 刪除輔助欄

• 任意點選 L 欄儲存格 → 「資料」→「升序排序」→ 選「擴展選取範圍」
• 排序後：標題、資料、標題、資料…完美交替
• 刪除 L 欄輔助欄，完成

核心邏輯解析

利用「排序」重新排列列順序。關鍵在於設計編號規則使「標題列」與「對應資料列」成為緊鄰的奇偶數對，升序後自然配對。此法適用於任何「固定標題 + 多筆資料」需重複標題的場景：發票、報價單、成績單、採購單等。

進階變化：VBA 一鍵自動化

Sub InsertHeaderEveryRow()
    Dim lr As Long, i As Long
    lr = Cells(Rows.Count, 1).End(xlUp).Row
    For i = lr To 2 Step -1
        Rows(1).Copy Destination:=Rows(i)
    Next i
End Sub

將碼貼入標準模組，指派巨集按鈕，真正一鍵完成，適合高頻月報作業。