«ü©w®É¶¡.°õ¦æ¥¨¶°

duck_simon

½Ð±Ð¥ý¶i:
§Ú±ý±N ¬P´Á¤@¦Ü¬P´Á¤»..¨C¤é20:25¤À(¨Ì¹q¸£®É¶¡)  °õ¦æ (½Æ»s¬Y°Ï¶ô..¶K¤W¬Y°Ï¶ô)
        ½Ð±Ð¤j¤j ³o®É¶¡VBA ¦p¦ó¼g?   ·PÁ«ü¾É !  ¯¬  ¶g¤é¦n¤ß±¡

­ã´£³¡ªL

¨º­ÓÀɮ׬O¤@ª½«O«ù¶}±Ò¶Ü???
¥i§ä§äAPPLICATION.ONTIMEªº¥Îªk

©Î§ä§ä"¤u§@±Æµ{"ªº¤èªk//
¼g¤@­Ó±Mªù°õ¦æªºVBAÀÉ®×,
±Æ©w®É¶¡¦Û°Ê¶}±Ò, °õ¦æ«á¦Û°ÊÃö³¬~~

´y­z¤Ó²³æ, §O¤HµLªk´£¨Ñ¥¿½T¤è®×~~

duck_simon

¦^´_ 2# ­ã´£³¡ªL


    ¦^¤j¤j :   °õ¦æ (½Æ»s¬Y°Ï¶ô..¶K¤W¬Y°Ï¶ô)..¦¹³¡¤À¥i¥H¬Ù²¤

lee88

1. Private Sub EX()
   
2.     '¥²¶·¦b²Ä¤@¦¸¤W¤È10ÂI,«ü©wªº®É¶¡¤§«e°õ¦æ
   
3.     Application.OnTime TimeValue("10:00:00 AM"), "¤u§@ªí1.TEST"
   
4.     '  "¤u§@ªí1.TEST" µ{¦¡¦b¤u§@ªí¼Ò²Õ(ª«¥ó¼Ò²Õ)¤¤»Ý«ü©ú    "¼Ò²Õ¦WºÙ.µ{¦¡¦WºÙ"
   
5.     'µ{¦¡¦b¤@¯ë¼Ò²Õ  µL»Ý«ü©ú¼Ò²Õ¦WºÙ,¥iª½±µ¼g¤W   "µ{¦¡¦WºÙ"
   
6. 
   
7. End Sub

½Æ»s¥N½X

1.    Sub TEST()
   
2.      '¼g¤W§A­n°õ¦æªºµ{¦¡½X
   
3.     '©Î©I¥s(°õ¦æ),µ{¦¡½X¼g¦b§Oªºµ{¦¡
   
4.    Application.OnTime Date + 1 + TimeValue("10:00 AM"), "¤u§@ªí1.TEST1"
   
5.    '¤U¦¸¦Û°Ê©ó¹j¤Ñ¦P®É¶¡°õ¦æµ{¦¡
   
6. '***  ¦p²Ä¤@¦¸«ü©wªº®É¶¡°õ¦æ TEST ¤]¥i¥H¤£­n°õ¦æ EX
   
7. 
   
8. End Sub

½Æ»s¥N½X

duck_simon

¦^´_ 4# lee88


    ·PÁ¤j¤j«üÂI..µL¥ô·P¿E..ÁÂÁÂ:)