ªð¦^¦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 : ­n§åµû§O¤H®É¡A¥ý·Q·Q¦Û¤v¬O§_§¹¬üµL¯Ê¡C
ªð¦^¦Cªí ¤W¤@¥DÃD