Dim File_Path As String
Dim strName As String
File_Path = "D:\111"
strName = Dir(File_Path & "\" & "*.xlsx")
Workbooks.Open Filename:=File_Path & "\" & strName
โค้ดด้านบนผมรัน แล้วมันสามารถเปิดได้แค่เวิร์คบุ๊คแรก เวิร์คบุ๊คเดียว ผมต้องการสั่งรันเปิดหลายเวิร์คบุ๊คต้องทำยังไงครับ
ใช้ Loop ช่วยต้องเขียนยังไงครับ มือใหม่มากๆ
เปิด Workbook หลาย Workbook ในโฟลเดอร์เดียว EXCEL VBA
Dim strName As String
File_Path = "D:\111"
strName = Dir(File_Path & "\" & "*.xlsx")
Workbooks.Open Filename:=File_Path & "\" & strName
โค้ดด้านบนผมรัน แล้วมันสามารถเปิดได้แค่เวิร์คบุ๊คแรก เวิร์คบุ๊คเดียว ผมต้องการสั่งรันเปิดหลายเวิร์คบุ๊คต้องทำยังไงครับ
ใช้ Loop ช่วยต้องเขียนยังไงครับ มือใหม่มากๆ