返回列表 上一主題 發帖

從其他excel檔案剪貼至指定區域

學到老死

帖子
44 
主題
14 
精華
0 
積分
58 
點名
0  
作業系統
Window 8 
軟體版本
2010 
閱讀權限
20 
性別
男 
註冊時間
2015-8-15 
最後登錄
2017-4-18 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-2-29 09:33 | 顯示全部帖子

從其他excel檔案剪貼至指定區域

早安，各位大大先進們。小的想請問 如何從B.xls 的 特定區域 剪貼 至 A.Xls 的特定區域 ，小的寫了一些程式碼，但是...失敗了

以下是個人寫的程式碼

Sub 從其他excek檔剪貼()

Dim A As Workbook, B As Workbook

  Set A = Workbooks("a.xlsx")

  Set B = Workbooks("b.xlsx")


  B.Worksheets("工作表1").Range("a1:c3").Copy Destination:=A.Worksheets("工作表1").Range("a1:c3")


End Sub

複製貼上.zip (11.75 KB)

收藏 分享

學到老死

帖子
44 
主題
14 
精華
0 
積分
58 
點名
0  
作業系統
Window 8 
軟體版本
2010 
閱讀權限
20 
性別
男 
註冊時間
2015-8-15 
最後登錄
2017-4-18 
2#
發表於 2016-2-29 10:31 | 顯示全部帖子
** 程式名稱 ,變數的宣告 皆須避免使用與VBA上的關鍵字(物件,函數,屬性,方法)相同的文字 **

看到新手教學，將變數A.B 改為變數X.Y 後， 及另存新檔為啟用巨集的活頁簿後。

再次執行程式碼，依然顯示找不到方法或成員...

TOP

        靜思自在 : 欣賞別人就是莊嚴自己。
返回列表 上一主題