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

¤WÂdªÑ²¼¿Ä¸ê¿Ä¨é¾lÃBCSV¤U¸ü°ÝÃD

¤WÂdªÑ²¼¿Ä¸ê¿Ä¨é¾lÃBCSV¤U¸ü°ÝÃD

¦U¦ì¤j¤j±z¦n:½Ð°Ý
¤WÂdªÑ²¼¿Ä¸ê¿Ä¨é¾lÃBCSV¤U¸ü :
ºô§}:http://www.otc.org.tw/ch/stock/margin_trading/margin_balance/margin_bal.php

¥H:http://www.otc.org.tw/ch/stock/margin_trading/margin_balance/margin_bal_download.php?d=103/01/03&s=0,asc,1

²£¥Í¤U±¡ªp
¥N¸¹,  ¦WºÙ,  «e¸ê¾lÃB(±i),  ¸ê¶R,  ¸ê½æ,  ²{Àv,  ¸ê¾lÃB,  ¸êÄÝÃÒª÷, ¸ê¨Ï¥Î²v(%), ¸ê­­ÃB,,  ¨é¾lÃB,  ¨éÄÝÃÒª÷,  ¨é¨Ï¥Î²v(%), ¨é­­ÃB,  ¸ê¨é¬Û©è(±i),  ³Æµù
1259  ,"¦w¤ß","303","2","0","0","305","6","3.77","8,097","0","0","0","0","0","0","0.0","8,097","0","1     C    "                                                                       
1333  ,"®¦±o§Q","0","0","0","0","0","0","0.0","21,275","0","0","0","0","0","0","0.0","21,275","0"," OX        "                                                                       

½Ð¤j¤j«ü±Ð ÁÂÁÂ

ÁÂÁ¤j¤j ¦^À³!
¦]§Ú¬O¥Ñºô¤W¦Û¾ÇVBA , ¬GªF«÷¦è´ê, ¥i§_½Ð¤j¤j«ü±Ð, §Ú¤U¦Cµ{¦¡¿ù»~¦a¤è

' ¤WÂdªÑ²¼¿Ä¸ê¿Ä¨é¾lÃB
Theurl = "http://www.otc.org.tw/ch/stock/margin_trading/margin_balance/margin_bal_download.php?d=" & Sdate & "&s=0"

   With ActiveSheet.QueryTables.Add(Connection:="URL;" & Theurl, Destination:=Range("b1"))
            .BackgroundQuery = True
            .RefreshStyle = xlOverwriteCells
            .RefreshPeriod = 0
            .AdjustColumnWidth = False
            .WebSelectionType = xlSpecifiedTables
            .WebFormatting = xlWebFormattingNone
            .WebTables = "1,2,3,4"
            .WebDisableDateRecognition = True         'Ãö³¬¤é´Á¿ëÃÑ
            .Refresh BackgroundQuery:=False
            .Delete

End With

·|¥X²{
1259  ,"¦w¤ß","303","2","0","0","305","6","3.77","8,097","0","0","0","0","0","0","0.0","8,097","0","1     C    "

½Ð¤j¤j«ü±Ð ÁÂÁÂ

TOP

·P®¦!! ¾Ç²ß¤¤

TOP

        ÀR«ä¦Û¦b : ¥ÌÄ@°µ¡BÅw³ß¨ü¡C
ªð¦^¦Cªí ¤W¤@¥DÃD