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

[µo°Ý] ½Ð±Ð ¦p¦ó¦bEXCELL¨ú±o¸Óºô¯¸¤§"§Y®É¦ô­p²b­È"

½Ð°Ýºô­¶¶×¤J°ÝÃD

½Ð°Ýºô­¶¶×¤J°ÝÃD
§Ú·Q±N¥H¤Uºô­¶¶×¤JEXECL
http://www.yuantaetfs.com/#/RtNav/Index
¦ýµLªk¶×¤J,¤£ª¾¦p¦ó¸Ñ¨M
³o­Óºô­¶¨S§ïª©«e¬OOKªº

TOP

¦^´_ 1# yan2463


    ­n¶×¤J­·ÀI¹w§i¤Î§K³d±ø´Ú?

TOP

excel ¬OµLªk¦Y JAVASCRIPT ±±¨îªººô­¶

TOP

¦^´_ 2# lukychien


    ¤£¬O,¬O­n¶×¤J«ö¦P·N«áªº§Y®É¹w¦ô²b­È

TOP

¦^´_ 3# jackyq

ÁÂÁ§A

TOP

¦^´_ 5# yan2463
¸Õ¸Õ¬Ý ¥ÎVBA¥¨¶°
  1. Option Explicit
  2. Sub Ex()
  3.     Dim E As Object
  4.     With CreateObject("InternetExplorer.Application")
  5.         .Visible = True
  6.         .Navigate "http://www.yuantaetfs.com/#/RtNav/Index"
  7.         Do While .Busy Or .ReadyState <> 4: DoEvents: Loop
  8.         Application.SendKeys "~", True   '«ö¤U¦P·NÁä
  9.         Do While .Busy Or .ReadyState <> 4: DoEvents: Loop
  10.         Set E = .Document.getelementsbytagname("TABLE")(21)
  11.          .Document.body.innerHTML = E.outerHTML
  12.         .execwb 17, 2       '  Select All
  13.         .execwb 12, 2       '  Copy selection
  14.         With ActiveSheet
  15.             .Cells.Clear
  16.             .[A1].Select
  17.             .PasteSpecial 'Format:="HTML"
  18.         End With
  19.         .Quit        'Ãö³¬ºô­¶
  20.     End With
  21. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 6# GBKEE

ÁÂÁÂ

TOP

[µo°Ý] ½Ð±Ð ¦p¦ó¦bEXCELL¨ú±o¸Óºô¯¸¤§"§Y®É¦ô­p²b­È"

½Ð±Ð ¦p¦ó¦bEXCELL¨ú±o¸Óºô¯¸¤§"§Y®É¦ô­p²b­È"     http://www.p-shares.com/#/RtNav/Index
§Ú¥u¯à§ì¨ì¤@¨ÇµL¥Îªº¤å¦r(¤º®e¦p¤U)
¡i¤¸¤j§ë«H¿W¥ß¸gÀçºÞ²z¡j¥»°òª÷¸gª÷ºÞ·|®Ö­ã©Î¦P·N¥Í®Ä¡A±©¤£ªí¥Üµ´µL­·ÀI¡C¥»¤½¥q¥H©¹¤§¸g²zÁZ®Ä¡A ¤£«OÃÒ¥»°òª÷¤§³Ì§C§ë¸ê¦¬¯q¡F¥»¤½¥q°£ºÉµ½¨}ºÞ²z¤H¤§ª`·N¸q°È¥~¡A¤£­t³d¥»°òª÷¤§¬ÕÁ«¡A¥ç¤£«OÃҳ̧C¤§ ¦¬¯q¡A§ë¸ê¤H¥ÓÁÊ«eÀ³¸Ô¾\°òª÷¤½¶}»¡©ú®Ñ¡C¥»¤å´£¤Î¤§¸gÀÙ¨«¶Õ¹w´ú¤£¥²µM¥Nªí°òª÷¤§ÁZ®Ä¡A°òª÷§ë¸ê­·ÀI ½Ð¸Ô¾\°òª÷¤½¶}»¡©ú®Ñ¡C¦³Ãö°òª÷À³­t¾á¤§¬ÛÃö¶O¥Î¡A¤w´¦ÅS©ó°òª÷¤½¶}»¡©ú®Ñ¤¤¡A§ë¸ê¤H¥i¦V¥»¤½¥q¤Î°òª÷ ¤§¾P°â¾÷ºc¯Á¨ú¡A©Î¦Ü¤½¶}¸ê°TÆ[´ú¯¸¤Î ¥»¤½¥qºô¯¸ ¤¤¬d¸ß¡C°òª÷«D¦s´Ú©Î«OÀI¡A¬GµL¨ü¦s´Ú«OÀI¡B«OÀI¦w©w°òª÷©Î¨ä¥L¬ÛÃö«O»Ù¾÷¨î¤§«O»Ù¡C

³Â·Ð°ª¤â«ü¾É§Ú¦p¦ó©óEXCELL¤º±N¦¹ºô­¶¸ü¤J(¦p¹Ï) ¦b¦¹¥ýÁÂÁ±z¤F
§Y®É¦ô­p²b­È.jpg
2015-7-19 00:37

¦^´_ 6# GBKEE

½Ð°Ý §Ú¨Ì·Ó±zªº¤º®e°µ¦¨VBA¤§«ö¶s ¦ýÂI«ö¶s ¥u·|¦Û°Ê¶}±ÒIE¨ì¨ººô¯¸ ¨Ã¤£·|¦Û°Ê§âDATA¶×¤J§ÚªºEXCELL¤º??
§Ú¬O­n¯à¦Û°Ê¶×¤JDATA¨ìEXCELL¤º §ÚªºµLª¾(ªì¾ÇªÌ) ÁٽбzÀ°¦£¸Ñ´b ÁÂÁ±z¤F

TOP

¦^´_ 1# yan2463

½Ð°Ý±zªº°ÝÃD¸Ñ¨M¤F¶Ü?
¯à§_À°ªì¾ÇªÌªº§Ú °µ­Ó²³æªº«ö¶s¤§EXCELLµ{¦¡ ·íÂI«ö¶s´N¯à¦Û°Ê§ó·sEXCELL¤º¤§"§Y®É¦ô­p²b­È"
¥ýÁÂÁ±z¤F
¥Ñ©ó§Úªº¯Å¼Æ«Ü§C µLªk¦b¦¹¤U¸ü ­Y±z©Î¦³¬Ý¨ì³o¦^ÂаT®§¤§°ª¤â ­YÄ@·NÀ°§Ú ³Â·Ð¨p°T§Ú §Ú±N§i¶D±z§Úªºmail

TOP

        ÀR«ä¦Û¦b : ¤H¥Í¨S¦³©Ò¦³Åv¡A¥u¦³¥Í©Rªº¨Ï¥ÎÅv¡C
ªð¦^¦Cªí ¤W¤@¥DÃD