ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

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

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

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

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

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

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

TOP

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


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

TOP

  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. 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. End Sub
½Æ»s¥N½X

TOP

¦^´_ 4# lee88


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

TOP

        ÀR«ä¦Û¦b : ¹ï¤÷¥À­nª¾®¦¡A·P®¦¡B³ø®¦¡C
ªð¦^¦Cªí ¤W¤@¥DÃD