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

«ü©w®É¶¡±Ò°Ê°ÝÃD

«ü©w®É¶¡±Ò°Ê°ÝÃD

¤j®a¦n
§Ú³]­p¤@­Ó¥¨¶°ÀH®É¯à°õ¦æ¡A·Q§Q¥ÎA®É¶¡¨Ó°õ¦æAµ{¦¡¡AB®É¶¡¨Ó°õ¦æBµ{¦¡¡C
Sub test()   
If TimeValue(Now) >= TimeValue("19:40:00") And TimeValue(Now) <= TimeValue("20:00:00") Then      ''''''''''''Aµ{¦¡

    Sheets("sheet1").Select
    Cells(1, "A") = 1
    End If
   
    If TimeValue(Now) >= TimeValue("20:00:00") And TimeValue(Now) <= TimeValue("20:50:00") Then     ''''''''''''Bµ{¦¡
    Sheets("sheet1").Select
    Cells(1, "A") = 2
    End If
end sub

¥i¬O¬°¦ó³£¥u¯à¦bA®É¶¡°õ¦æ¥¨¶° Aµ{¦¡¤~·|°Ê¡AB®É¶¡°õ¦æ¥¨¶°Bµ{¦¡¤~·|°Ê¡A
¦³µL¿ìªk¦b¥ô¦ó®É¶¡°õ¦æ¥¨¶°¡A¥iµ¥«ÝA®É¶¡¨ì°õ¦æAµ{¦¡¡AB®É¶¡¨ì°õ¦æBµ{¦¡©O? ÁÂÁÂ

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD