返回列表 上一主題 發帖

[發問] 把資料貼在最後”列”的寫法

hugh0620
　暱稱: VBA向前衝

高中生Rank: 3Rank: 3

帖子
559 
主題
58 
精華
0 
積分
626 
點名
0  
作業系統
win8 
軟體版本
office2013 
閱讀權限
50 
性別
男 
來自
TW 
註冊時間
2010-11-22 
最後登錄
2024-6-14 
1# 跳轉到 »
發表於 2011-12-22 12:26 | 顯示全部帖子
本帖最後由 hugh0620 於 2011-12-22 12:27 編輯

hi~ 樓主~ 你的寫法多了一個點
Range("A1:A10").Copy .Range("A65536").End(xlUp).Offset(1, 0)
下述為正確的寫法
Range("A1:A10").Copy Range("A65536").End(xlUp).Offset(1, 0)

另外想請教的是
若是想把儲存格(A16)的資料複置到Sheet2的A欄的最後一列
是像這樣子寫嗎
Range("A1:A10").Copy .Sheet2.Range("A65536").End(xlUp).Offset(1, 0)

也可以寫成
Sheet2.Range("A65536").End(xlUp).Offset(1, 0)=Range("A16")
學習才能提升自己

TOP

        靜思自在 : 做該做的事是智慧，做不該做的事是愚癡。
返回列表 上一主題