呆呆 發問時間: 電腦與網際網路軟體 · 3 年前

一個EXCEL VBA小問題?

從外來資料複製進EXCEL

我想要他會去某一頁活頁簿

搜尋某一欄最後一個然後

在最後一個下面貼上外來資料(不是EXCEL裡面剪貼的)

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

Sub 貼上()

'貼上

'

Sheets("貼上").Select

H = Range("B:B").End(xlDown).Row + 1

# 這一行我不知道如何讓他判斷H這個值

然後找到B欄的H值貼上

End Sub

跪求大神解惑.....

1 個解答

評分
  • 3 年前
    最佳解答

    Ca = Sheets("來源").[H1048576].End(3).Row ''H欄最後一格

    Cb = [B1048576].End(3).Row + 1 ''Sheets("貼上")B欄最後一格的下一格

    Range("B" & Cb) = Sheets("來源").Range("H" & Ca)

還有問題?馬上發問,尋求解答。