vb²Ù×÷excelµÄÎÊÌ⣬´ó¼Ò°ïæ¿´¿´
ÎÒÔÚvbÖвÙ×÷excelµÚÒ»´ÎÔËÐеÄʱºò¶¼Ã»ÓÐÎÊÌ⣬µ±µÚ¶þ´ÎÔËÐеÄʱºò¾Í³öÏÖ
£¢¶ÔÏócellsµÄ·½·¨'_Global'ʧ°Ü£¢£¬ÎÒÒѾ°Ñ²Ù×÷excelµÄ¶ÔÏó¶¼nothingÁË
ÎÒ¸öÈËÈÏΪÊÇÒѾ´æÔÚexcelµÄ½ø³ÌÁË£¬µ«ÊÇÈç¹ûÇ¿ÖÆɱexcel½ø³ÌµÄ»°ÓÖÅ´íɱÎÞ¹¼
ËùÒÔ´ó¼Ò°ïæ¿´¿´ÊÇʲôÎÊÌ⣬ÓÖÔõÑù½â¾ö¡¡
http://download.csdn.net/source/1262359
Äã¿ÉÒÔÉèÖöϵ㣬¿´³ö´íµÄλÖþÍÐÐ....
excelµÄ¶ÔÏó.quit
³ö´íµÄ´úÂ룿
Ïȼ¤»îÄãÒª²Ù×÷µÄ¶ÔÏó!Object.Activate 'ÀýÈçÄãÏëÒª±à¼Sheet1µÄ»°¾ÍÏÈSheet1.ActivateÔÙ¶ÔSheel1½øÐÐcell²Ù×÷
Ïȼ¤»îÄãÒª²Ù×÷µÄ¶ÔÏó!Object.Activate 'ÀýÈçÄãÏëÒª±à¼Sheet1µÄ»°¾ÍÏÈSheet1.ActivateÔÙ¶ÔSheel1½øÐÐcell²Ù×÷
ÎÒÒ²Óöµ½ÀàËƵÄÏÖÏó,ÕâÑù¸ã¶¨À²
ºÃ¶«Î÷£¬ÕýÔÚÑ°ÕÒÄØ¡£
ºÃ¶«Î÷°¡,лл·ÖÏí
ÈçºÎ»»³Éʵ¼Êµ¥Ôª¿ðÄØ
Ïà¹ØÎÊ´ð£º
vb½«winsock¿Ø¼þ·â×°µ½dllÎÊÌâ ÓÐʲôºÃµÄ˼·£¿ Èç¹ûÓÃSocket APIÄØ£¿
ÀýÈ磬ÏñÏÂÃæÕâÑù·â×°Winsock¿Ø¼þ£¬ÐеÄͨ£¿
´´½¨ActiveX dll£¬Ìí¼Ó´°ÌåfrmClient£¬¼ÓÈëWinSock¿Ø¼þwskClient¡£
Àà´úÂ룺
Option Expli ......
±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö
´úÂëÓ¦¸ÃÔõô´ò£¿
LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......
¸÷λ´óϺ£º
ÎÒÓÐÒ»¸öVBµ÷ÓÃË®¾§±¨±íµÄϵͳ£¬±¨±íÊÇ×÷Ϊһ¸öDesignǶÔÚVBÀïµÄ£¬½ñÌì·¢ÏÖ´òÓ¡µÚÒ»Õű¨±íÕý³££¬Í¬ÑùµÄÊý¾Ý£¬ÔÚµã´òÓ¡ÔÙµ÷ÓÃÒ»´Î¾Í»á±¨ Memory FullµÄ´íÎ󣬵«ÊÇ ......
ÎÒÖÆ×÷Á˸öÓû§¿Ø¼þ£¬ÐèÒª¶¯Ì¬¼ÓÔص½´°ÌåÉÏ
Set objExt = Controls.Add("¹¤³Ì1.meActiveX", argName)
objExt.Visible = True
³ÌÐòÒ»´ÎÄܼÓÔØN¸ö£¬ ÏÖÔÚÏë¶Ô ......