返回列表 上一主題 發帖

將多個sheet的資料合併到第一個sheet中

回復 1# sky00264
每頁最大資料量在I欄
試試
  1. Sub ex()
  2. For i = 2 To Sheets.Count
  3.    Sheets(i).UsedRange.Copy Sheets(1).Cells(Rows.Count, "I").End(xlUp).Offset(1, -8)
  4. Next
  5. End Sub
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 人生不一定球球是好球,但是有歷練的強打者,隨時都可以揮棒。
返回列表 上一主題