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

[µo°Ý] DDE°O¿ý¸ê®Æ¨D§U

¦^´_ 26# c_c_lai

¶Ù c_c_lai ¤j¤j±z¦n
¤p©f³Ìªñ¤]·Q¾ÇDDE©Ô¤J¸ê®Æ
»Ý¨D­è¦n¸ò¼Ó¥D¤@¼Ë
¥i¬O§Ú¥á¶i¥h«á«oÅã¥Ü"Åܼƥ¼©w¸q"
¬O¦b
Sub updateFollow()
    Dim Rng As Range
   
    On Error Resume Next
    If (TimeValue(Now) < TimeValue("08:45:00") Or TimeValue(Now) > TimeValue("13:45:00")) Then Exit Sub

    With Sheet2
³o¬q
½Ð°Ý¸Ó«ç»ò­×¥¿ >"<
¤p©f¦b¦¹¦V¦U¦ì¤j¤j¨D±Ð¤F Orz

TOP

c_c_lai ¤j¤j·PÁÂ
§Ú¤w¸g¸Ñ¨M¤F , §âµ{¦¡¤¤ªº "Sheet2" ¥þ³£§ï¦¨ Excel ¥ª¤U¤èªº "¤u§@ªí1" ´N¥i¥H¤F ^^
¤£¹L¤£ª¾¹D¬°¤°»ò§Ú¦pªG§â¥ª¤U¨¤ªº"¤u§@ªí1"§ï¦¨ "Sheet2" «o¨S¥Î ~ ©Ç

¦Ó¥B¤S¦h¤F¦n¦h°ÝÃD¾¾
¬Ý¨Ó­n¶}¥t¤@½g¤å³¹¤F >~<
¤p©f¦b¦¹¦V¦U¦ì¤j¤j¨D±Ð¤F Orz

TOP

        ÀR«ä¦Û¦b : §g¤l¥ß«í§Ó¡A¤p¤H«í¥ß§Ó¡C
ªð¦^¦Cªí ¤W¤@¥DÃD