如何將Excel裡工作薄內的多個工作表複製到一張新表裡

時間 2021-10-14 22:38:41

1樓:一點設計演示

1.需要把多個excel表都放在同一個資料夾裡面,並在這個資料夾裡面新建一個excel。如圖所示:

2.用microsoft excel開啟新建的excel表,並右鍵單擊sheet1,找到“檢視**”,單擊進去。進去之後就看到了巨集計算介面。如圖所示:

3.然後把下面這些巨集計算的**複製進去,然後找到工具欄上面的“執行”下的“執行子過程/使用者窗體”,**如下,如圖所示:

sub 合併當前目錄下所有工作簿的全部工作表()

dim mypath, myname, awbname

dim wb as workbook, wbn as string

dim g as long

dim num as long

dim box as string

mypath = activeworkbook.path

myname = dir(mypath & "\" & "*.xls")

awbname = activeworkbook.name

num = 0

do while myname <> ""

if myname <> awbname then

set wb = workbooks.open(mypath & "\" & myname)

num = num + 1

with workbooks(1).activesheet

.cells(.range("b65536").end(xlup).row + 2, 1) = left(myname, len(myname) - 4)

for g = 1 to sheets.count

wb.sheets(g).usedrange.copy .cells(.range("b65536").end(xlup).row + 1, 1)

next

wbn = wbn & chr(13) & wb.name

wb.close false

end with

end if

myname = dir

loop

range("b1").select

msgbox "共合併了" & num & "個工作薄下的全部工作表。如下:" & chr(13) & wbn, vbinformation, "提示"

end sub

4.執行之後,等待10秒針左右,等執行完畢,就是合併完成之後,會有提示,點確定就可以了。檢視合併後的資料,有5000多行,就是同一個資料夾裡面17個excel表資料合併後的結果。

效果如圖所示。

2樓:匿名使用者

按住ctrl,然後選中**(下面票籤),然後按正常的複製步驟即可。

3樓:小小紅小五子

選中目標sheet,右鍵-移動或複製

怎麼把一張excel的一個工作表複製到另外一個新的excel中?

4樓:匿名使用者

方法一:

舊錶內,ctrl + a,ctrl + c新表內,選中 a1 ,按 enter

ok方法二:

兩個檔案都開啟

在要複製的表名上,右鍵,移動或複製工作表……第一格,工作薄選另一個工作薄,下面 建立副本 前打勾確定ok

5樓:匿名使用者

同時開啟那個新的excel檔案,(如果只是想要將複製的工作,變成一個檔案,忽略這一項)

選擇要複製的工作表名稱,右鍵,“移動或複製工作表”,工作簿選擇那個新的檔案,

勾選“建立副本”確定

6樓:辦公大王小藍條

然後選擇需要複製的選項即可

7樓:迷你可樂

右擊要複製的目標檔案,選擇移動或複製工作表,建立副本(描紅處打鉤),上端描紅處選擇你要移動到哪個excel檔案中,需要注意的是兩個excel檔案需要同時開啟

8樓:匿名使用者

選擇你要複製的那個工作表,在工作表標籤上右鍵選擇“移動或複製工作表”,在“工作表”下拉選單裡選擇“(新工作簿)”,同時勾選建立副本,這樣就好了

如此為完全格式的複製,請參考

9樓:匿名使用者

在工作表標籤上單擊右鍵-移動或複製工作表-選擇-建立副本,在“工作簿”下拉選項框選擇你要複製到的某個工作簿,再確定。 新的工作表必須也開啟

10樓:★終憶→史

1、把book1裡面的sheet1工作表 全選 - 複製 2、開啟book2中的sheet2後,貼上 後就可以了!

excel如何把多個工作表內容快速複製到一個工作表中

11樓:匿名使用者

把 多個工作表 合併到到一張表, 最快捷的方法是用巨集處理:

例如 將多個表合併到總計表:

總計  表只留一個標題

右鍵點 彙總 工作表 標籤 ,檢視**,  把如下**複製進去, f5執行:

sub 工作表合併()

for each st in worksheetsif st.name <> activesheet.name then st.

usedrange.offset(1, 0).copy [a65536].

end(xlup).offset(1, 0)

next

end sub

就會把多個表合併 到   總表,

如下例: 在sheet  總計  中 執行  如上**,就會將所有 月份 分表 彙總 進來,方便後續處理,而 不需要一次次貼上處理

12樓:雲淡風輕微課堂

5分鐘學會在excel中如何把多個工作表合併成一個表 n常用的技能

13樓:匿名使用者

發郵件給我啊

你的表樣,

和要求[email protected]

excel如何將多行轉成多列,EXCEL如何將多行轉成多列 10

試試這個 本程式需要把要變換的資料命名為 資料 資料區的列數可以任意,不一定是5 方法 選中該區域,在名稱框內輸入 資料 即可,然後按程式要求輸入每行要填的資料行的數目.按照你的說明,90行分成3列儲存,即在彈出的行數裡輸入3即可.sub 轉換 dim numcol as integer dim n...

excel,如何將工作簿名字新增到單元格內

開啟excel,按alt f11,輸入以下 private sub worksheet activate for x 2 to sheets.countworksheets sheet1 cells x 1,1 sheets x name next x end sub 這是sheet1原先的內容 按...

EXCEL中如何將桌面多個工作表全部放到工作表中不要複製容易卡死求解答謝謝

你說的複製卡死是否是將乙個工作表中的內容全選複製?如果是,推薦另一種方法。例如你同時開啟了123和456兩個檔案,想將456檔案中的工作表 石頭 移到123檔案中,可以右鍵單擊工作表石頭,如下左圖,選擇移動或者複製工作表,在彈出的對話方塊中點下拉列表選擇123檔案,然後選在某個工作表之前,也可以選擇...