標題: [發問] 如何用VBA複製資料到指定位置? [打印本頁]

---

作者: ie123456    時間: 2015-3-11 18:06     標題: 如何用VBA複製資料到指定位置?

想請問，如果我有二個excel檔，想複製"a.xls"中的"A1:D4"儲存格至"b.xls"
但準備貼上時，會秀出"對話框"問說要從那個儲存格開始貼上 或 是我滑鼠所按的位置上進行貼上
請問可以這樣做嗎?(目前只會貼上至固定位置上)
謝謝

---

作者: lpk187    時間: 2015-3-12 23:31

回復 1# ie123456


    語法如下例：

1. Set myCell = Application.InputBox(prompt:="請選擇儲存格或範圍", Type:=8)
   
2. AA = myCell.Address
   
3. Worksheets("工作表1").Range("A1:D4").Copy Destination:=Worksheets("工作表3").Range(AA)

複製代碼

---

作者: sghsgh1111    時間: 2015-3-12 23:38

不知有沒有符合你的期方式

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Workbooks("A.xls").Activate
Sheets("sheet1").Range("A14").Copy
Workbooks("B.xls").Activate
Selection.PasteSpecial xlPasteAll
End Sub

---

作者: ie123456    時間: 2015-3-26 17:04

感謝二位的幫忙，大概知道怎麼做了，如果還有問題，在上來請教
謝謝

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)