一個EXCEL VBA小問題?

2017-10-30 9:18 pm
從外來資料複製進EXCEL
我想要他會去某一頁活頁簿
搜尋某一欄最後一個然後
在最後一個下面貼上外來資料(不是EXCEL裡面剪貼的)

我自己嘗試寫 但在最後面變數地方 我真的找不到方法可以讓他做貼上的動作(ctrl+C)

Sub 貼上()
'貼上
'

Sheets("貼上").Select
H = Range("B:B").End(xlDown).Row + 1

# 這一行我不知道如何讓他判斷H這個值
然後找到B欄的H值貼上

End Sub

跪求大神解惑.....

回答 (1)

2017-11-02 12:12 pm
✔ 最佳答案
Ca = Sheets("來源").[H1048576].End(3).Row ''H欄最後一格
Cb = [B1048576].End(3).Row + 1 ''Sheets("貼上")B欄最後一格的下一格
Range("B" & Cb) = Sheets("來源").Range("H" & Ca)


收錄日期: 2021-05-03 06:45:43
原文連結 [永久失效]:
https://hk.answers.yahoo.com/question/index?qid=20171030131820AAQYxQb

檢視 Wayback Machine 備份