[VBA ] 請問如何寫停止指令?

看板Visual_Basic作者TNR (冥河擺渡者)時間15年前 (2011/01/13 14:00)推噓1(1推 0噓 4→)

留言5則, 3人參與討論串1/2 (看更多)

小弟才疏學淺寫個自動貼上的程式碼但程式自動時間開啟點與結束點無法順利執行以下為程式碼內容是於8:45開始每隔一分鐘就自動貼上值ㄧ直貼到13:45停止.. 有請高手幫幫小弟看是那裡寫錯了@@ 感恩!! sub dde_paste() Dim nextrundde As Date Application.ScreenUpdating = False nextrundde = Now + TimeValue("00:01:00") 'If nextrundde >= Date & " 08:45:00" And nextrundde <= Date & " 13:45:00" Then Application.OnTime nextrundde, "DDE", Schedule:=True 'End If Application.OnTime nextrundde, "dde_paste", Schedule:=True End Sub -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.124.70.85

推

JingTeng

01/14 20:40, , 1^F

01/14 20:40, 1^F

→

JingTeng

01/14 20:42, , 2^F

01/14 20:42, 2^F

→

MOONRAKER

01/16 23:37, , 3^F

01/16 23:37, 3^F