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

·sª©ªÑ¥«¤½¶}¸ê°TÆ[´ú¯¸ªº¸ê®Æ§ì¨ìEXECL?

·sª©ªÑ¥«¤½¶}¸ê°TÆ[´ú¯¸ªº¸ê®Æ§ì¨ìEXECL?

¤§«eª©ªº¤½¶}¸ê°TÆ[´ú¯¸ªº¸ê®Æ¡A¥Î
[ ¸ê®Æ ] -> [ ¶×¤J¥~³¡¸ê®Æ ] -> [ ·s¼WWEB¬d¸ß ]
http://mopsov.tse.com.tw/server-java/t05st22?colorchg=1&off=1&TYPEK=["where"]&isnew=true&year=["year"]&co_id=["stockid"]&
´N¥i¥H¦Û°Ê¶×¤J°]³øµ¥¸ê®Æ¨ìexcel§@¤ÀªR¡A
·sªÑ¥«¤½¶}¸ê°TÆ[´ú¯¸¤@§ïª©«á®æ¦¡¤£¦P¡A¦¹¥\¯à´NµLªk¨Ï¥Î¦¹¥\¯à¡A½Ð°Ý¦³¤H¯àÀ°¦£¬Ý¤@¤U­n¦p¦ó§ï¡A¤~¯à¦Û°Ê¬d¸ß¬ÛÃö¸ê®Æ?
-----------------------------------------------------------------------------------------------------------------------------------------------------
§Ú·Q¶×¤Jexcelªººô­¶¦³¡G
http://mops.twse.com.tw/mops/web/t164sb03 ¦X¨Ö¸ê²£­t¶Åªí

http://mops.twse.com.tw/mops/web/t164sb04 ¦X¨Öºî¦X·l¯qªí

http://mops.twse.com.tw/mops/web/t164sb05 ¦X¨Ö²{ª÷¬y¶qªí

§Æ±æ¥i¥H´£¨Ñ¤èªk¡A¦]¬°¦³«Ü¦h³øªí­n§ì¡C

«æ¨D§U¡I
§Æ±æ­þ¦ì¤j¤j¥i¥HÀ°¦£¸Ñ¤j

TOP

¦^´_ 2# xisun2002
µ{¦¡°Ï §ä§ä¦³'http://mops.twse.com.tw/mops/webªº¸ê°T
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

§Æ±æ¥ÎEXCEL¶×¤J¥~³¡¸ê®Æ¥\¯à¨Ó°µ¡A§Æ±æª¾¹Dªº¤j¤jÀ°À°¦£

TOP

¦^´_ 3# GBKEE


     ½Ð±ÐGBKEE¥S
µ{¦¡°Ïhttp://forum.twbts.com/viewthrea ... p;extra=&page=2
¨äªþ¥ó¥u¾A¦Xª©ªº¤½¶}¸ê°T¯¸
·sª©ªº¤½¶}¸ê°T¯¸¨ÃµLªkÀ˵ø,
½Ð坂¤jÀ°¦£­×§ï ÁÂÁÂ!!

TOP

¦^´_ 5# pupai
¨C¤@ºô­¶ªº«Ø¸m¤£¦P,­n¬Ýºô­¶¤º®e­×§ïµ{§Çªº.
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 6# GBKEE


¨Ì·Ó³o¤T­Óºô§}
http://mops.twse.com.tw/mops/web/t164sb03 ¦X¨Ö¸ê²£­t¶Åªí
http://mops.twse.com.tw/mops/web/t164sb04 ¦X¨Öºî¦X·l¯qªí
http://mops.twse.com.tw/mops/web/t164sb05 ¦X¨Ö²{ª÷¬y¶qªí
·Ð½Ðª©¥D¼·ªÅÀ°¦£
ÁÂÁÂ

TOP

¦^´_ 7# pupai


   
«ö¤U ¹Ï¤ùªººô§} http://mops.twse.com.tw/server-j ... N=3&REPORT_ID=C
  1. Option Explicit
  2. Sub Ex()
  3. Dim URL As String, xCo_Id As String, xSyear As String, xSseason As String
  4. xCo_Id = "[" & """ªÑ²¼¥N¸¹""" & "," & """2485""" & "]"                     '­n¨D¿é¤Jºô­¶ªº°Ñ¼Æ:ªÑ²¼¥N¸¹
  5. xSyear = "[" & """¦~«×""" & "," & """" & Format(Date, "e") & """" & "]"    'Format(Date, "e")->¤¤µØ¥Á°êªº¦~«×
  6. xSseason = "[" & """©u§O""" & "," & """" & Format(Date, "q") & """" & "]"       'Format(Date, "q")->·í¦~«×ªº©u§O
  7. URL = "URL;http://mops.twse.com.tw/server-java/t164sb01?step=1&CO_ID=" & xCo_Id & "&SYEAR=" & xSyear & "&SSEASON=" & xSseason & "&REPORT_ID=C"
  8.     With ActiveSheet.QueryTables.Add(Connection:=URL, Destination:=Range("A1"))
  9.         .AdjustColumnWidth = False                   '¦Û°Ê½Õ¾ãÄæ¼e
  10.         .WebSelectionType = xlSpecifiedTables
  11.         .WebFormatting = xlWebFormattingNone
  12.         .WebTables = "2,3,4"                 '¸ê²£­t¶Åªí,ºî¦X·l¯qªí,²{ª÷¬y¶qªí
  13.         .WebPreFormattedTextToColumns = True
  14.         .WebConsecutiveDelimitersAsOne = True
  15.         .WebSingleBlockTextImport = False
  16.         .WebDisableDateRecognition = False
  17.         .WebDisableRedirections = False
  18.         .Refresh BackgroundQuery:=False
  19.     End With
  20. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 8# GBKEE


    ¦¬¨ì °J¤ß·PÁ  !!
PS:¦pªGGBKEE¥S ©Î ®a±Ú ¦Ò¼{¥X¤@¥» VBA§ìªÑ¥«ªº®Ñ §Ú¤@©w­q10¥» ÁÂÁÂ!!

TOP

¦^´_ 8# GBKEE

Dear ¶Wª©¤j,

¤U¹Ï§ä¤£¨ì§A¤W­z»¡ªººô§}¡A¦b¤½¶}¸ê°TÆ[´ú¯¸-->Àç¹B·§ªp-->°]°È¤½ªR¸ê®Æ¡A½Ð¶Wª©¤j¸Ñ´b­þ¸Ì¥i¥H­×§ïºô§}ªºªÑ¥«¥N¸¹...«D±`·PÁÂ...
¥Î²³æªº¤ß°µ½ÆÂøªº¨Æ

TOP

        ÀR«ä¦Û¦b : ¶¢¤HµL¼Ö½ì¡A¦£¤HµL¬O«D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD