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

[µo°Ý] ¥ÎVBA¶}±Òªººô­¶¸ê®ÆcsvÀÉ¡A¦p¦ó¤£¬°¤@ªø¦êªº¦r¦ê¡H

¦^´_ 1# vesperlee
  1. Sub Ex()
  2.     Dim wb As String
  3.     wb = "http://www.otc.org.tw/ch/stock/aftertrading/otc_quotes_no1430/SQUOTE_02_1020111.csv"
  4.     Workbooks.Open (wb)
  5. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¦³¦h¤Ö¤O¶q´N°µ¦h¤Ö¨Æ¡A¤£­n¤ß¦sµ¥«Ý¡Aµ¥«Ý¤~·|¸¨ªÅ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD