Excel Forum

ถาม วิธี check รายชื่อไฟล์ก่อนเปิด ว่ามีจริงหรือไม่ครับ

นี้คือชื่อไฟล์ครับ ซึ่งจะรัน วันที่ไปเรื่อยๆครับ คือจะมีบางวันที่ ที่จะไม่มีไฟล์ครับ ไฟล์ ทั้งหมดอยู่ใน folder เดียวกกันครับ

set-history_EOD_2014-01-10



ขอถามเพิ่มเติมครับว่า code ล่างนี้ ใช้ยังไงครับ

Filename = Dir(path & "\*.xls", vbNormal)
If Len(Filename) = 0 Then Exit Sub
Do Until Filename = vbNullString
....
Loop


ขอบคุณครับ

ใช้ในการเข้าถึงไฟล์ใน Path ทีกำหนด หากความยาว Path ในการเข้าถึงไฟล์มีค่าเป็น 0 ก็ให้ออกจาก Loop ครับ

ขอบคุณครับ