[問題] excel 分頁明細 合併在一個分頁

看板Office作者 (慌慌張張)時間8年前 (2017/05/18 19:09), 編輯推噓0(004)
留言4則, 1人參與, 最新討論串1/1
(若是和其他不同軟體互動之問題 請記得一併填寫) 軟體:excel 版本: 2010 大家好 我的需求是 我的一個excel檔案裡,有200個分頁 我想要將每一個分頁裡的B2~J200 全部顯示在同一個分頁 (不是要相加或是計算數量 是要把明細全部整併在一個分頁裡看) 網路上查了很多 也試了用插入模組的方式輸入以下資料 Sub Combine() Dim J As Integer On Error Resume Next Sheets(1).Select Worksheets.Add Sheets(1).Name = "Combined" Sheets(2).Activate Range("A1").EntireRow.Select Selection.Copy Destination:=Sheets(1).Range("A1") For J = 2 To Sheets.Count Sheets(J).Activate Range("A1").Select Selection.CurrentRegion.Select Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)(2) Next End Sub 但是這個好像不符合我的需求,照理應該要可以選擇每個分頁的起始結束範圍 (例如我是要B2~J200) 不知道到底該怎麼做,剛也爬了版上文章, 但是關於EXCEL分頁合併的資料很少, 所以才來請版上高手協助一下 > < -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 210.69.138.172 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1495105746.A.77C.html

05/19 00:00, , 1F
將range("a1").select至select.offset(1,0).resize()改為
05/19 00:00, 1F

05/19 00:01, , 2F
原文要的範圍
05/19 00:01, 2F

05/19 00:02, , 3F
另外range("a1").entirerow.select和下一行就看原po有沒有
05/19 00:02, 3F

05/19 00:03, , 4F
要複製標題列,如無則可取消
05/19 00:03, 4F
文章代碼(AID): #1P7O3ITy (Office)
文章代碼(AID): #1P7O3ITy (Office)