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

½Ð°Ý¬°¤°»ò°õVBA®É¡A°O¾ÐÅé·|¶V¨Ó¶V¤j¡AÅܦ¨³t«×ÅܺC

With WebShtYah.QueryTables.Add(Connection:=YahooURL, Destination:=WebShtYah.[A1])
        .AdjustColumnWidth = False
        .WebSelectionType = xlAllTables
        .WebFormatting = xlWebFormattingNone
        .WebPreFormattedTextToColumns = True
        .WebConsecutiveDelimitersAsOne = True
        .WebSingleBlockTextImport = False
        .WebDisableDateRecognition = False
        .Refresh BackgroundQuery:=False
       .Delete
    End With

TOP

        ÀR«ä¦Û¦b : ¡i°µ¤Hªº¶}©l¡j¨C¤@¤Ñ³£¬O¬G¤Hªº¶}©l¡A¨C¤@­Ó®É¨è³£¬O¦Û¤vªºÄµ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD