返回列表 上一主題 發帖

不同excel之間的資料複製。

tku0216

帖子
209 
主題
43 
精華
0 
積分
262 
點名
0  
作業系統
win 7 
軟體版本
office 20** 
閱讀權限
20 
性別
男 
註冊時間
2011-11-3 
最後登錄
2017-4-16 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2014-4-22 23:02 | 顯示全部帖子

不同excel之間的資料複製。

各位好，請問該如何使用VBA，撰寫不同Excel之間的資料複製？
譬如：我有兩份Excel表，一份是表單、另一份是資料庫，我想完成使用資料庫填入表單的功能。
我目前想到的辦法為，需要使用到資料庫時，開啟該份Excel表，複製對應的資料進入表單。
語法為
Filename = "D:\Users\issac\Desktop\TQC+.xlsx"                                                          '讀取資料庫路徑
Application.Workbooks.Open Filename                                                                           '開啟該份檔案(此時兩份Excel共存在一個檔案裡)
Workbooks("TQC+.xlsx").Activate                                                                                       '切換至 TQC+.xlsx

但下一步，當我嘗試存取TQC+.xlsx的資料時，卻一直沒辦法完成...我直接想到以下的方式：
Worksheets("102").Range("a1").Select  一直出現"Class Range的Select方法失敗"的錯誤訊息~

請問該如何解？謝謝。
收藏 分享

tku0216

帖子
209 
主題
43 
精華
0 
積分
262 
點名
0  
作業系統
win 7 
軟體版本
office 20** 
閱讀權限
20 
性別
男 
註冊時間
2011-11-3 
最後登錄
2017-4-16 
2#
發表於 2014-4-23 10:19 | 顯示全部帖子
版大您好，感謝回覆，這樣就可以選到我所需要的工作表了。

另想再請教，嘗試在您的寫法加東西：
With Workbooks("TQC+.xlsx").Worksheets("102")
        .Activate
        .[a1].CurrentRegion.Select
     End With

上方紅字段的程式碼是否可以使用[Ctrl+J]的方式自動帶出？

TOP

        靜思自在 : 難行能行，難捨能捨，難為能為，才能昇華自我的人格。
返回列表 上一主題