ªð¦^¦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 : ¤f»¡¦n¸Ü¡B¤ß·Q¦n·N¡B¨­¦æ¦n¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD