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

excel ©T©w®É¶¡¤º °õ¦æ wbe ¬d¸ß

excel ©T©w®É¶¡¤º °õ¦æ wbe ¬d¸ß

¤§«e¤À¨É¦b¥»°Ïªºµ{¦¡
¼Ò²Õ:
Sub auto_open()
   For Each qy In Sheet8.QueryTables
      qy.Refresh BackgroundQuery:=False
    Next
      Application.OnTime Now + TimeValue("00:00:51"), "auto_open"
End Sub

§Ú­n¦p¦ó¦b ¬P´Á¤@¨ì¬P´Á¤­  09:00 -17:00 ¶}°_¬d¸ß ¨ä¥L®É¶¡¤£¶}

ÁÂÁªO¤Wªº ¤j¤j­Ì

        ÀR«ä¦Û¦b : ·R¤£¬O­n¨D¹ï¤è¡A¦Ó¬O­n¥Ñ¦Û¨­ªº¥I¥X¡C
ªð¦^¦Cªí ¤W¤@¥DÃD