標題: [發問] VB 工作表欄位值移動到其他工作表欄位 [打印本頁]

---

作者: comw213    時間: 2017-7-13 23:31     標題: VB 工作表欄位值移動到其他工作表欄位

請問有辦法用VBA  
將sheet3的大範圍Raw data

綠色部分複製到 sheet1
藍色部分複製到 sheet2

想請教各位大大 謝謝

[attach]27467[/attach]

[attach]27469[/attach]

[attach]27470[/attach]

[attach]27471[/attach]

---

作者: GBKEE    時間: 2017-7-14 16:35

回復 1# comw213
試試看

1. Option Explicit
   
2. Sub Ex()
   
3.     With Sheets("sheet3").UsedRange
   
4.         .Range("a1", .Range("b1").End(xlDown)).Copy Sheets("sheet1").Range("a2")
   
5.         .Range("f1", .Range("g1").End(xlDown)).Copy Sheets("sheet2").Range("a3")
   
6.                        'Sheets("sheet2")的  "a1:a2" 是合併儲存格
   
7.     End With
   
8. End Sub

複製代碼

---

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