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

[µo°Ý] ½Ð°Ýºô­¶¶×¤Jexcel«á§ó·sªº°ÝÃD

¸Õ¸Õ¬Ý

Sub refre()


    ActiveWorkbook.Connections("³s±µ").Refresh
     Application.OnTime Now() + TimeValue("00:00:05"), "refre"
End Sub

ConnectionsùØ­±¶ñ¼g¬ÛÃö³s±µªº¦WºÙ(¥´¶}³s½u¥i¥H¬Ý¨ì)

TOP

        ÀR«ä¦Û¦b : ¤f»¡¤@¥y¦n¸Ü¡A¦p¤f¥X½¬ªá¡F¤f»¡¤@¥yÃa¸Ü¦p¤f¦R¬r³D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD