返回列表 上一主題 發帖

各位大大excel vba能將多個工作表合併個對應內容？

y54161212

帖子
29 
主題
6 
精華
0 
積分
67 
點名
0  
作業系統
Windows10 
軟體版本
Office365 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2020-6-14 
最後登錄
2024-3-22 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 »
發表於 2020-9-8 22:37 | 顯示全部帖子
用最簡單的
Set sht1=worksheets(“Sheet1”)
Set sht2=Worksheets(“Sheet2”)
Set sht3=worksheets(“Sheet3”)
Set sht4=worksheets(“Sheet4”)

sht2.range(“D7:G7”).copy  ‘選取的範圍
sht1.range(“d2”).pastespecial  paste:=xlpastevalues ‘要貼上的第一格

sht3.range(“”).copy ‘看不出來你要複製的實際範圍
sht1. Range (“d9”).pastespecial Paste:=xlpastevalues

sht4.range(“”).copy
sht1.range(“”).pastespecial paste:=xlpastevalues

應該就好了
不然錄製個巨集也可以
莫讓他人錯誤傷害自己

TOP

y54161212

帖子
29 
主題
6 
精華
0 
積分
67 
點名
0  
作業系統
Windows10 
軟體版本
Office365 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2020-6-14 
最後登錄
2024-3-22 

論壇榮譽勳章論壇贊助勳章
2#
發表於 2020-9-9 20:59 | 顯示全部帖子
回復 3# jcchiang

好厲害的寫法
莫讓他人錯誤傷害自己

TOP

        靜思自在 : 【時日莫空過】一個人在世間做了多少事，就等於壽命有多長。因此必須與時間競爭，切莫使時日空過。
返回列表 上一主題