½Ð°Ý³oÓºô¶¦p¦ó¥ÎWEB¬d¸ß¿é¤Jexcel
- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-22
- ³Ì«áµn¿ý
- 2024-2-1
|
¦^´_ 68# GBKEE
¨Æ«á·Q·Q¡Aµoı§Q¥Î "ªÅ¥Õºô¶" ¨Ó°µ¬°Á{®É¾Ô³õ (¶i¦æ½Æ»s¤u§@)¡A
³oÓ Idea ÆZ¦nªº¡A¥ç¤£·|¯}Ãa쥻ºô¶ªº Table ¤º®e¡C- Set A = .Document.getElementsBytagname("table")
- For x = 1 To 6
- With ie
- .Document.body.innerHTML = A(x).outerHTML
- .ExecWB 17, 2 ' Select All
- .ExecWB 12, 2 ' Copy selection
- End With
-
- With shts
- .Range("A" & .[A65535].End(xlUp).Row + 1).Select
- .PasteSpecial Format:="HTML"
- End With
- Next
½Æ»s¥N½X |
|
|
|
|
|
|
- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-22
- ³Ì«áµn¿ý
- 2024-2-1
|
¦^´_ 68# GBKEE
«¢«¢¡I
¤Ó²M²n¤F¤]¤£¦æ¡I (¥u¯à²Ä¤@Ó "ªÅ¥Õºô¶")
|
|
|
|
|
|
|
- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-22
- ³Ì«áµn¿ý
- 2024-2-1
|
¦^´_ 72# GBKEE
©Ò¥H»¡¹À¡A³o´N¬O§Ú¤§©Ò¥H¨ØªA Micrsoft ªº¦a¤è¡I
¤£±o¤£ªA®ð¡C |
|
|
|
|
|
|
- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-22
- ³Ì«áµn¿ý
- 2024-2-1
|
¦^´_ 72# GBKEE
¤£«H¨¸¦A¸Õ¤@¦¸ (Marked «á¥ýÀx¦s¤@¦¸¡A¦A¦æ°õ¦æ)¡C
¨Æ«á¥u¥X²{¹L¤@¦¸"Åv°ÝÃD"«á¡A¤@¤Á¤SÂk©ó¥ÀR (¥¿±`¤F)¡C
³o«K¬O§Ú¨ØªA Microsoft ªº½t¬G¡C |
|
|
|
|
|
|
- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-22
- ³Ì«áµn¿ý
- 2024-2-1
|
¦^´_ 72# GBKEE - Set ie = CreateObject("InternetExplorer.Application")
- ie.Navigate "about:Tabs"
- ' ie.Visible = True
-
- Set shts = ActiveSheet ' Sheets("¤u§@ªí2")
- shts.Cells.Clear
-
- URL = "http://www.cnyes.com/twstock/Institutional/1101.htm"
- With CreateObject("InternetExplorer.Application")
- ' .Visible = True ' ¬O§_Åã¥Ü IE
- .Navigate URL
-
½Æ»s¥N½X |
|
|
|
|
|
|