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

´ú¸Õ_VBA ©w®É°õ¦æ

´ú¸Õ_VBA ©w®É°õ¦æ

Private Sub Just_on_Time()
    '¹w©w°õ¦æ®É¶¡,
    Test = Format([A2].Value, "h:m:s")
    MsgBox "´ú¸Õ!!" & Test
   
   Application.OnTime TimeValue(Test), "©w®É°õ¦æ"
   
End Sub

¥i¥H°õ¦æ¶Ü??
PW5

        ÀR«ä¦Û¦b : §Ú­Ì³Ì¤jªº¼Ä¤H¤£¬O§O¤H¡D¥i¯à¬O¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD