일정한 시간간격으로 프로시저 실행하기 http://www.herbnoori.com/shop/orderend.html?ordernum=20100223162636plarina&paymethod=B&card_flag=N Dim varNow As Variant sub 프로세스1() Sheets("샵송장입력csv").Cells(1, 1) = Now() varNow = Now + TimeValue("00:00:02") Application.OnTime varNow, "프로세스1" End Sub Sub 소리내기종료() On Error Resume Next Application.OnTime varNow, "프로세스1", Schedule:=False End Sub Sub ExportActiveWorksheet() Dim oldname$, oldpath$, .. 더보기 이전 1 ··· 3 4 5 6 7 8 9 ··· 1071 다음