Re: ดึงข้อมูลจากไฟล์อื่นมาบันทึกทุก 30 นาทีแบบไม่ทับข้อมูลเด
Posted: Thu May 16, 2013 11:54 pm
ผมทดสอบแล้ว Code สำหรับการจับเวลาเพื่อปิดไฟล์ทำงานได้ถูกต้อง คือปิดไฟล์ได้ตามที่ตั้งเวลาไว้ครับ
ฟอรัม Excel, VBA และอื่นๆ ของคนไทยเพื่อประโยชน์ของทุกคนในจักรวาล (Forum Excel, VBA and others of Thai people for everyone in the universe.)
http://snasui.com/
ตอบไปแล้วครับP1649 wrote:ไฟล์ย่อย Link Data.xlsx ปิดตามเวลา
แต่ไฟล์หลัก Close file.xlsm ยังคงเปิดอยู่ ต้องการให้ปิดตามไปด้วยครับ
snasui wrote: กรณีต้องการให้ปิดเมื่อถึงเวลาที่กำหนดลองปรับ Code เป็นตามด้านล่างครับกรณีต้องการจะ Save และปิดหลายไฟล์ก็ระบุไฟล์ที่ต้องการ Save และปิดเอาไว้ใน Code ครับCode: Select all
Sub Copy_Data 'Other code If Now > Date + TimeValue("16:00:00") Then Application.OnTime nTime, "SaveFile", , False wk.save wk.Close Exit Sub End If End Sub