軟體: Micrpsoft Excel
版本: 2007
各位版友好，初次接觸VBA發現是很好用的工具，
但對其邏輯還是有些不熟識，想請教有經驗的板友，
以下唯一簡易Click Sub，目的在點擊按鈕後可執行貼上動作，
想再次執行按鈕Click，複製貼上的內容可繼續往下續貼，
例: 第一次點擊按鈕=> 貼在sheet1中的A1
第二次點擊按鈕=> 貼在sheet1中的A5
第三次點擊按鈕=> 貼在SHEET1中的A9
.........................以此類推
為簡化問題，複製貼上的內容暫時假設一樣，再麻煩指教，謝謝
Sub 按鈕1_Click()
' 按鈕1_Click Macro
Sheets("Sheet2").Select
Range("A2").Select
Selection.Copy
Sheets("Sheet1").Select
Range("A5").Select
ActiveSheet.Paste
End Sub

https://youtu.be/NRhTd15WMH0 類似這樣

已試驗成功, 但若是貼圖會失敗寫法如下Sheets("Sheet2").SelectActiveSheet.ChartObjects("Chart 1").ActivateActiveChart.ChartArea.CopySheets("Sheet1").[a5].Offset(Sheets("Summary").[c1] * 5)Sheets("Sheet1").[c1] = Sheets("Sheet1").[c1] + 1再麻煩指教, 謝謝

" target="_blank" rel="nofollow">

類似這樣

已成功 感謝soyoso大大指教!