使用參照即可, 不用寫 VBA1.資料在 E7~E10000 , 假設內容為 1~100002. 輸入G6=7, H6=53.合併儲存格在 H7,8 合併, H9,10合併 , ....... 到 H200004.H7 填入公式: =INDIRECT((ADDRESS($G$6+(ROW()-$G$6-1)/2+1,$H$6)))5.合併儲存格直接拉下複製即可.