標題: [發問] 請問多個檔案與多筆工作表資料同步更新該如何設定 [打印本頁]

---

作者: mrcv3    時間: 2023-8-23 12:47     標題: 請問多個檔案與多筆工作表資料同步更新該如何設定

請問多個檔案與多筆工作表資料同步更新該如何設定?
檔案1與檔案2內容相同，Excel內的多筆工作表"ID欄位"，依"ID工作表"裡No代入相應的ID
再麻煩大家幫忙，謝謝。

[attach]36774[/attach]
[attach]36775[/attach]

---

作者: singo1232001    時間: 2023-8-29 09:58

回復 1# mrcv3


    Sub test()

Set s = Sheets("ID")
r = s.Cells(s.Rows.Count, "B").End(3).Row - 1
ar = s.Cells(2, 1).Resize(r, 2)
For Each Z In Sheets
If Z.Name Like "*Leg*" Then
Zr = Z.Cells(Rows.Count, "B").End(3).Row
For i = 2 To Zr
Z.Cells(i, 3) = ar(Z.Cells(i, 2), 2)
Next
End If
Next
End Sub

---

作者: mrcv3    時間: 2023-9-1 10:58

回復 2# singo1232001


    大大您好
感謝您熱心回覆
再請問把公式代入此檔案哪裡需要修正?
懇請版大指點
謝謝

---

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