返回列表 上一主題 發帖

[發問] 這段vba哪裡寫錯了？

電暖爐

帖子
45 
主題
10 
精華
0 
積分
62 
點名
0  
作業系統
win8 
軟體版本
office2007 
閱讀權限
20 
註冊時間
2015-1-18 
最後登錄
2015-10-9 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-1-25 21:19 | 只看該作者

[發問] 這段vba哪裡寫錯了？

Union(Range(Sheets("查詢表1").Range("a1:B5")), Range(Sheets("查詢表2").Range("a1:B5"))).Copy
Range("D1").Select
ActiveSheet.Paste

要將兩查詢表的a1到b5合併剪貼到使用中工作表的d1儲存格
該怎麼改？
收藏 分享

luhpro

帖子
835 
主題
6 
精華
0 
積分
915 
點名
0  
作業系統
Win 10,7 
軟體版本
2019,2013,2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-3 
最後登錄
2025-7-5 
2#
發表於 2015-1-26 00:17 | 只看該作者
回復 1# 電暖爐
跨公作表同時拷貝再貼上可能不行,可以考慮分兩段寫 :

Sheets("查詢表1").Range("a1:B5").Copy Range("D1")
Sheets("查詢表2").Range("a1:B5").Copy Range("F1")

TOP

        靜思自在 : 一句溫暖的話，就像往別人身上灑香水，自己會沾到兩三滴。
返回列表 上一主題