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

½Ð°Ý¥i¥H¦P®É°õ¦æ¨â­Ó¥¨¶°¶Ü¡H

½Ð°Ý¥i¥H¦P®É°õ¦æ¨â­Ó¥¨¶°¶Ü¡H

§Ú¦b°õ¦æ¤@­Ó¥¨¶°ªº®É­Ô,´N¤£¯à°õ¦æ¥t¤@­Ó¥¨¶°
·Æ¹«ÂIÀ»¥t¤@­ÓExcelÀɤ]¨S¤ÏÀ³¡]Activeµøµ¡¹L¤£¥h¡^
½Ð°Ý¥i¥H¦P®É°õ¦æ¨â­Ó¥¨¶°¶Ü¡H
¦Ó¦b¤@­Ó¥¨¶°°õ¦æ¤¤,§Ú¥i¥H¨Ï¥Î¥t¤@­ÓExcelÀɶܡH
ÁÂÁ¦^µª¡I

¦^´_ 1# bbojj


    ¦P®É¶]¨â­Óµ{¦¡
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 1# bbojj
¦b¹ê§@¤W¡A§Ú¦³¸I¹L¦¹Ãþªº±¡ªp¡A
¥ç§Y·í±z¤w¸g¶}±Ò¨Ã°õ¦æ¤@ExcelÀÉ (¦¹ÀÉ¥¿¦b¦Û°Ê°õ¦æ VBA µ{¦¡¡A¦p¡G½L¤¤¥¿¦b¶×¤JDDE¸ê®Æµ¥)¡A
³o®É¡A¦pªG¦A¶}±Ò¦³¨ä¥¦Excelªí¡A¨Ã°õ¦æ´ú¸Õ¥¦ªº¥¨¶°®É¡A­ì¥»¶}±ÒªºÀÉ®×·|¨ü¨ì¼vÅT¡A¦³®É¥ç
·|²×¤î¨ä¥»¨­ªº VBA ¹B§@¡C

TOP

§Ú¬O¦b°õ¦æ¤@­Ó¥¨¶°®É,´N¤£¯à¦b°õ¦æ¥t¤@­Ó¥¨¶°,¬Æ¦Ü¤£¯à¨Ï¥Î¥t¤@­ÓExcelÀÉ

TOP

¦^´_ 4# bbojj
play.gif
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 5# Hsieh
­è­è§Ú½Æ»s¤FDDE ¸ê®Æ¬ö¿ý°ÝÃD.xls¡A¨Ã¤À§O±N¥¦­Ì¦P®É¶}±Ò°õ¦æ¡A
Æ[¹î¨âÃä¸ê®Æ¼g¤Jªºª¬ªp¡A¤@¤Á³£¥¿±`§¡¤À§O±y±y¦æ¨«¡A
¦ý¤§«e½L¤¤®É¡AExcel §@·~¤¤§Ú¤S¶}±Ò¤F³o¨à½×¾ÂªºÄ³ÃDÀɮפ@­±°µ´ú¸Õ®É¡A¥i¯à¬O¸Ó´ú¸Õµ{¦¡¦³¿ù»~²£¥Í¼vÅT¨ì¤F¡BÁÙ¬O...........¡H
½L¤¤ DDE ¸ê®Æ¶×¤J§@·~«oµLºÝ³Q°±¤î¤F¡AÁÙ¦n¦³¤@«ö¶s¥i¤©Ä~Äò±Ò°Ê¹B§@¡A¤§«á¦A¤]¤£´±¦P®É°õ¦æ¨ä¥¦ Excel VBA
µ{¦¡´ú¸Õ¤F¡C ½Ð±Ð¤j¤j¡A ·|³o¼Ë¶Ü¡H

TOP

¥»©«³Ì«á¥Ñ GBKEE ©ó 2012-4-27 08:22 ½s¿è

¦^´_ 6# c_c_lai
¥t·s¶}±Ò ¤@­Ó Excel µ{¦¡, ´N»P °õ¦æDee ªº Excel µ{¦¡ µLÃö

TOP

¦^´_ 6# c_c_lai
µ{¦¡ªº°õ¦æ¤@¯ë»¡¨Ó¦P¤@­ÓÀɮ׬O¤£¯à¦P®É°õ¦æ2­Óµ{§Ç
³o¥i§Q¥Î¤W­z¦P®É°õ¦æ2­Óµ{§Çªº¤èªk¬ð¯}
¦A¨Ó´N¬O±±¨îÅv°ÝÃD
¤W¹Ï°Êµe¤¤¡A§A¥iµo²{¡A¦b°j°é¤¤DoEvents¥æ¥X±±¨îÅvµ¹¨Ï¥ÎªÌ¡A¤~¥i¥HÅý¨Ï¥ÎªÌ©ó°j°é°õ¦æ·í¤¤¡A¾Þ§@ÂI¿ï
¦Ü©ó³sµ²¥~³¡µ{¦¡(DDE)³o¬O»P¤½¦¡§@¥Î¬Û·íªº°µªk¡A·íDDE¶Ç¦^¥~³¡µ{¦¡¸ê°T¡A¬¡­¶Ã¯±N°õ¦æ­«ºâ°Ê§@
¦pªG¤½¦¡¶V¦h­«ºâ®É¶¡¶Vªø¡A­Y©ó­«ºâ³~¤¤¾D¹J¨ä¥Lµ{§Ç§@¥Î¤¶¤J®É¡A¨t²Î¥i¯à²£¥Í¤£¥i¹w´Áªº¿ù»~
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

ª©¥D¤jªº½d¨Òªº½T¥i¦æ

¤£¹L¤p§Ìªºµ{¦¡³£­n¤Wºô­¶§ì¸ê®Æ¡A³£¦³¤U­±³o¦æ³]©w¡A©Ò¥H§Y¨Ï¦bdoeventsªº³]©w¤U¡A¤]¤£¯à«ö¤U¥t¤@­Ó«ö¶s

¥»¨Ó·Q»¡¶}¨â­Óºô­¶§ì¡A®É¶¡·|¬Ù¤@¥b¡A¤£¹LÁÙ¬O¤£¯à«ö¤U¥h

¤£ª¾¦³¸Ñ¶Ü¡H
ÁÂÁÂ

Set xa = CreateObject("internetexplorer.application")

Set xb = CreateObject("internetexplorer.application")

TOP

        ÀR«ä¦Û¦b : ¤£©È¨Æ¦h¡A¥u©È¦h¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD