Page 1 of 1
เรื่อง vba ครับ excel 2007 อยากจะหยุดการทำงานของ Ontime
Posted: Mon Aug 27, 2012 11:21 am
by jittaboy
สวัสดีครับ
พอดีผมอยากจะ หยุดการทำงานของ Application.Ontime พอมีวิธีหยุดไหมครับ หรือ kill process นั้นเลย
ผมให้ฟังชันนี้ แทน Time_Tick event เพราะใน excell ไม่มี(หรือว่ามีหรือป่าวผมไม่รู้ครับ รบกวนผู้รู้ตอบครับ) สรุปคือผมใช้ฟังชันนี้ในการ ให้ตัว sheet มีการตรวจสอบ ค่าทุก1 วินาที ครับ
ใน vb 6 ผมใช้ Timer ครับ แต่ใน excel ใช้อะไรแทนครับ ผมก็เลยใช้ Application.ontime แต่ ปัญหาคือ จะหยุดการทำงานหรือ cancel โปรเสส นี้ยังงัยครับ
ขอบคุณครับ ^__^
Re: เรื่อง vba ครับ excel 2007 อยากจะหยุดการทำงานของ Ontime
Posted: Mon Aug 27, 2012 3:11 pm
by snasui
ช่วยแนบตัวอย่าง Code ของ Ontime ที่เขียนไว้แล้วมาด้วยครับ
Re: เรื่อง vba ครับ excel 2007 อยากจะหยุดการทำงานของ Ontime
Posted: Wed Aug 29, 2012 1:19 pm
by jittaboy
ครับพี่ผมได้ทำการแนบมาแล้วครับ ^__^
Re: เรื่อง vba ครับ excel 2007 อยากจะหยุดการทำงานของ Ontime
Posted: Thu Aug 30, 2012 1:48 pm
by jittaboy
ดันๆครับ ยากจังครับ จะมีคนมาช่วยตอบไหมหนอ
Re: เรื่อง vba ครับ excel 2007 อยากจะหยุดการทำงานของ Ontime
Posted: Thu Aug 30, 2012 5:18 pm
by snasui
ผมไม่เห็นไฟล์แนบหรือ Code ที่เขียนมาแล้วครับจึงยังไม่ได้ตอบเพิ่ม
Re: เรื่อง vba ครับ excel 2007 อยากจะหยุดการทำงานของ Ontime
Posted: Wed Sep 05, 2012 1:37 pm
by jittaboy
ผมอยาเขียนประมาณนี้ครับพี่ แต่พอลองโค้ดแล้ว แค่หยุด การทำงานยังหยุดไม่ได้เลยครับ ^__^ ขอบคุณครับพี่
Sub OnLoadRefesh()
Application.OnTime Now + TimeValue("00:00:01"), "OnLoadRefesh"
Call CountDownTime
End Sub
Sub CountDownTime
ช่วงนี้ก็จะทำการลดเวลาลงครับ
End Sub
Re: เรื่อง vba ครับ excel 2007 อยากจะหยุดการทำงานของ Ontime
Posted: Wed Sep 05, 2012 1:59 pm
by snasui
ลองดูตัวอย่าง การใช้ Ontime ตามด้านล่างครับ
Code: Select all
Public Start As Double
Sub StartTimeQuery()
Start = Now + TimeValue("00:00:01")
Application.OnTime EarliestTime:=Start, _
Procedure:="XYZ", Schedule:=True
End Sub
Sub StopTimeQuery()
On Error Resume Next
Application.OnTime EarliestTime:=Start, _
Procedure:="XYZ", Schedule:=False
End Sub
ตัวอย่างการวาง Code ให้เป็น Code เพื่อสะดวกในการอ่านสามารถดูได้ที่กระทู้นี้ครับ
viewtopic.php?f=3&t=1187