ÓÑÇéÌáʾ£ºÈç¹û±¾ÍøÒ³´ò¿ªÌ«Âý»òÏÔʾ²»ÍêÕû£¬Çë³¢ÊÔÊó±êÓÒ¼ü¡°Ë¢Ð¡±±¾ÍøÒ³£¡ÔĶÁ¹ý³Ì·¢ÏÖÈκδíÎóÇë¸æËßÎÒÃÇ£¬Ð»Ð»£¡£¡ ±¨¸æ´íÎó
¾ÅÉ«Êé¼® ·µ»Ø±¾ÊéĿ¼ ÎÒµÄÊé¼Ü ÎÒµÄÊéÇ© TXTÈ«±¾ÏÂÔØ ½øÈëÊé°É ¼ÓÈëÊéÇ©

excel_vba_±à³Ì½Ì³Ì(ÍêÕû°æ)-µÚ19ÕÂ

°´¼üÅÌÉÏ·½Ïò¼ü ¡û »ò ¡ú ¿É¿ìËÙÉÏÏ·­Ò³£¬°´¼üÅÌÉ쵀 Enter ¼ü¿É»Øµ½±¾ÊéĿ¼ҳ£¬°´¼üÅÌÉÏ·½Ïò¼ü ¡ü ¿É»Øµ½±¾Ò³¶¥²¿£¡
¡ª¡ª¡ª¡ªÎ´ÔĶÁÍꣿ¼ÓÈëÊéÇ©ÒѱãÏ´μÌÐøÔĶÁ£¡



4¡£¡¡Ê¹ÓÃÈκÎÄãÔÚµÚÒ»ÕÂÀïѧµ½µÄ·½·¨À´ÔËÐкêWhatsInACell¡¡¡¡
Èç¹ûÄã¸øÁ½¸ö²»Í¬¹¤³ÌÀïµÄ²»Í¬¹ý³ÌÒÔÏàͬµÄÃû³Æ£¬ÄÇôÄã±ØÐëÃ÷È·¹¤³ÌÃû³Æ²ÅÄܵ÷ÓÃËü¡£¡¡¡¡
ÎÒÃǼÙÉèFirstSteps¡¡£¨Chap01¡£xls£©¹¤³ÌºÍPersonal¡¡£¨Personal¡£xls£©¡¡¹¤³ÌÀﶼÓнÐFormulasOnOff¡¡
µÄºê£¬Òªµ÷ÓÃPersonal¡¡£¨Personal¡£xls£©¹¤³ÌÀïµÄFormulasOnOff£¨¼Çס£¬ÄãÒѾ­±ØÐëÏȽ¨Á¢¶Ô¡¡
PersonalµÄÒýÓã©£¬±ØÐë°üÀ¨¹¤³ÌÃû³Æ£º¡¡¡¡
Sub¡¡WhatsInACell¡¡£¨¡¡£©¡¡¡¡¡¡
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡
¡¡¡¡¡¡¡¡¡¡¡¡¡¡Personal¡£Switches¡£FormulasOnOff¡¡¡¡¡¡
End¡¡Sub¡¡¡¡¡¡
¼¼ÇÉ2£­2¡¡VBÈçºÎ¶¨Î»±»µ÷ÓõĹý³Ì¡¡¡¡
µ±Äãµ÷ÓÃÒ»¸ö¹ý³Ì£¬VBÏÈÔÚÖ÷µ÷·½£¨WhatsInACell£©µÄͬһ¸öÄ£¿éÀï²éÕÒ¡£Èç¹ûûÓÐÕÒµ½±»µ÷¹ý³Ì¡¡
¡¡£¨FormulasOnOff£©£¬VB¾Í»áÔÚͬһ¸ö¹¤³ÌµÄÆäËüÄ£¿éÀï²éÕÒ¡£Èç¹û»¹ÊÇÕÒ²»µ½£¬VBÔò»á¼ì²é¶ÔÆäËü¡¡
¹¤³ÌµÄÒýÓᣡ¡¡¡
¼¼ÇÉ2£­3¡¡¹¤³ÌÃû³Æ²»ÔÚÒýÓöԻ°¿ò¡¡¡¡
Èç¹ûÄãÏëÒªµ÷ÓÃÒ»¸öµ±Ç°¹Ø±ÕµÄ¹¤³ÌÀïµÄ¹ý³Ì£¬µ±Äã´ò¿ªÒýÓöԻ°¿òÊÔͼ½¨Á¢ÒýÓÃʱ£¬Õâ¸ö¹ý³ÌÃû¡¡
³Æ²»ÔÚÇåµ¥ÖС£µã»÷¡°ä¯ÀÀ¡±£¬²¢ÇÒ´ò¿ª±»µ÷Óùý³ÌËùÔÚµÄÎļþ¼Ð¡£Ìí¼ÓÒýÓõĶԻ°¿òĬÈϵØÁгö¡¡
Êý¾Ý¿âÎļþ£¨*¡£olb£»¡¡¡£tlb£»¡¡¡£dll£©¡£´ÓÎļþÀàÐ͵ÄÏÂÀ­Çåµ¥ÖÐÑ¡ÔñExcelÎļþ£¨*¡£xls£»¡¡*¡£xla£©£¬Ñ¡¡¡
Ôñ²¢´ò¿ªº¬ÓÐÄãÒªµ÷Óùý³ÌµÄÎļþ¡£Õâ¸ö¹¤³ÌµÄÃû³Æ½«»á¼ÓÔÚÒýÓöԻ°¿òµÄ×îºóÒ»ÐС£¡¡¡¡

5¡¡Á˽â¶ÔÏó£¬ÊôÐԺͷ½·¨¡¡¡¡

ʹÓÃVBA£¬Äã¿ÉÒÔ´´½¨¹¤³Ì¿ØÖÆExcelµÄÐí¶à¶«Î÷£¬ÄãͬÑùÒ²¿ÉÒÔ¿ØÖƺܶàÆäËüµÄÓ¦ÓóÌÐò¡£VBµÄΰ¡¡
´óÀ´×ÔÓÚËüµÄ¿ØÖƺ͹ÜÀí¸÷ÖÖ¸÷ÑùµÄ¶ÔÏóµÄÄÜÁ¦¡£µ«ÊÇ£¬¡°¶ÔÏó¡±ÊÇʲôÄØ£¿¡°¶ÔÏó¡±ÊÇÄãͨ¹ýVBA¡¡
¿ØÖƵĶ«Î÷¡£¹¤×÷²¾£¬¹¤×÷±í£¬¹¤×÷±íÀïµÄµ¥Ôª¸ñÇøÓò£¬Í¼±í»òÕß¹¤¾ßÌõ£¬ÕâЩֻÊÇһЩÓÃExcel¡¡
ʱÏëÒª¿ØÖƵĶ«Î÷µÄ¾ÙÀý¡£ÕâЩ¶«Î÷¾ÍÊǶÔÏó¡£Excelº¬Óг¬³öÒ»°ÙÖÖÄã¿ÉÒÔͨ¹ý²»Í¬·½Ê½²Ù×÷µÄ¡¡
¶ÔÏó¡£ËùÓеÄVB¶ÔÏ󶼱»·Ö²ã¹éÀࡣһЩ¶ÔÏó±¾ÉíÓÖ¿ÉÄܺ¬ÓÐÆäËüµÄ¶ÔÏó£¬ÀýÈ磬Excelʱһ¸öÓ¦¡¡
ÓöÔÏó£¬Õâ¸öÓ¦ÓöÔÏó°üº¬ÆäËü¶ÔÏó£¬ÀýÈ繤×÷²¾»òÕßÃüÁîÌõ¡£¹¤×÷²¾¶ÔÏó¿ÉÄÜ°üº¬ÆäËü¶ÔÏó£¬Èç¡¡

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡42¡¡

¡­¡¡Ò³Ãæ¡¡59¡­

¹¤×÷±í»òÕßͼ±í¡£Ä㽫ÔÚ±¾ÕÂÖÖѧϰÈçºÎ¿ØÖÆÒÔÏÂExcel¶ÔÏó£ºÇøÓò£¬´°¿Ú£¬¹¤×÷±í£¬¹¤×÷²¾ºÍÓ¦¡¡
Óá£ÎÒ½«¡°ÇøÓò¡±ÁÐÔÚÁ˵ÚһλÖã¬ÓÐÒ»¸ö·Ç³£ÖØÒªµÄÔ­Òò£¬Èç¹ûÄã²»ÖªµÀÈçºÎ²Ù×÷µ¥Ôª¸ñÇøÓòµÄ¡¡
»°£¬Äã»ù±¾Éϲ»ÄÜÓõç×Ó±í¸ñÀ´×öʲô¡£¡¡¡¡
ijЩ¶ÔÏó¿´ÉÏÈ¥ÏàËÆ¡£Èç¹ûÄã´ò¿ªÒ»¸öй¤×÷²¾£¬¼ì²éËüµÄ¹¤×÷±í£¬Äã²»»á·¢ÏÖʲô²»Í¬¡£Ò»×éÏà¡¡
ËƵĶÔÏó±»³ÆΪ¡°¼¯ºÏ¡±¡£ÀýÈ磬¹¤×÷±íµÄ¼¯ºÏ°üº¬ËùÓоßÌ幤×÷²¾ÖеŤ×÷±í£»ÃüÁîÌõµÄ¼¯ºÏ°ü¡¡
º¬ËùÓеŤ¾ßÌõºÍ²Ëµ¥¡£¼¯ºÏͬÑùÊǶÔÏó¡£ExcelÖÐʹÓõÃ×îƵ·±µÄ¼¯ºÏÊÇ±í£¨Sheets£©¼¯ºÏ£¬Ëü¡¡
´ú±íËùÓеŤ×÷±íºÍͼ±í£¬»¹Óй¤×÷²¾¼¯ºÏ£¬¹¤×÷±í¼¯ºÏÒÔ¼°´°¿Ú¼¯ºÏ¡£µ±ÄãʹÓü¯ºÏʱ£¬ÏàͬµÄ¡¡
¶¯×÷¿ÉÒÔÔÚÕâ¸ö¼¯ºÏÖÐËùÓеĶÔÏóÉÏÖ´ÐС£¡¡¡¡
ÿһÖÖ¶ÔÏó¶¼ÓÐһЩÌØÕ÷¹©ÄãÃèÊö¡£ÔÚVBÀÕâЩ¶ÔÏóµÄÌØÕ÷±»³ÆΪ¡°ÊôÐÔ¡±¡£ÀýÈ磬¹¤×÷²¾¶ÔÏó¡¡
ÓÐÃû³ÆÊôÐÔ£»ÇøÓò¶ÔÏóÓÐÁУ¬×ÖÌ壬¹«Ê½£¬Ãû³Æ£¬ÐУ¬ÑùʽºÍÖµµÈÊôÐÔ¡£ÕâЩ¶ÔÏóÊôÐÔÊÇ¿ÉÒÔÉèÖá¡
µÄ¡£Äãͨ¹ýÉèÖöÔÏóµÄÊôÐÔ¿ØÖƶÔÏóµÄÍâ¹ÛºÍλÖ᣶ÔÏóÊôÐÔÒ»´ÎÖ»ÄÜÉèÖÃΪһ¸öÌض¨µÄÖµ¡£ÀýÈ磬¡¡
µ±Ç°¹¤×÷²¾²»¿ÉÄÜͬʱÓÐÁ½¸ö²»Í¬µÄÃû³Æ¡£VBÖÐ×îÄÑÀí½âµÄ²¿·ÖÊÇÓÐЩÊôÐÔͬʱÓÖ¿ÉÒÔÊǶÔÏó¡£Ïë¡¡
ÏëÇøÓò£¨Range£©¶ÔÏó£¬Äã¿ÉÒÔͨ¹ýÉèÖÃ×ÖÌåÑÕÉ«À´¸Ä±äÑ¡¶¨µ¥Ôª¸ñµÄÍâ¹Û¡£µ«ÊÇ£¬×ÖÌ壨Font£©¡¡
¿ÉÒÔÓв»Í¬µÄÃû³Æ£¨Times¡¡New¡¡Roman£»¡¡Arial£»¡¡¡­£©£¬²»Í¬µÄ×ֺţ¨10£¬12£¬14£¬¡­£©ºÍ²»Í¬µÄÑù¡¡
ʽ£¨´ÖÌ壬бÌ壬Ï»®Ïߣ¬¡­£©¡£ÕâЩÊÇ×ÖÌåµÄÊôÐÔ¡£Èç¹û×ÖÌåÓÐÊôÐÔ£¬ÄÇô×ÖÌåÒ²ÊǶÔÏ󡣡¡¡¡
ÊôÐÔÕæÊÇÁ˲»Æð£¬ÈÃÄã¸Ä±ä¶ÔÏóµÄÍâ¹Û£¬µ«ÊÇ£¬ÈçºÎ¿ØÖÆÕâЩ²Ù×÷ÄØ£¿ÄãÔÚʹExcelΪÄãÖ´ÐÐÈÎÎñ¡¡
֮ǰ£¬ÄãÐèÒªÖªµÀÁíÍâÒ»¸öÊõÓï¡£¶ÔÏóÓз½·¨¡£Ã¿Ò»ÖÖÄãÏëÒª¶ÔÏó×öµÄ²Ù×÷¶¼±»³ÆΪ¡°·½·¨¡±¡£×î¡¡
ÖØÒªµÄVB·½·¨ÊÇAdd·½·¨¡£Äã¿ÉÒÔʹÓÃÕâ¸ö·½·¨Ìí¼ÓÒ»¸öй¤×÷²¾»òÕß¹¤×÷±í¡£¶ÔÏó¿ÉÒÔʹÓò»Í¬¡¡
µÄ·½·¨¡£ÀýÈ磬ÇøÓò£¨Range£©¶ÔÏóÓÐרÃŵķ½·¨ÈÃÄãÇå³ýµ¥Ôª¸ñÄÚÈÝ¡¡£¨ClearContents·½·¨£©£¬¡¡Çå¡¡
³ý¸ñʽ£¨ClearFormats·½·¨£©ÒÔ¼°Í¬Ê±Çå³ýÄÚÈݺ͸ñʽ£¨Clear·½·¨£©¡£»¹ÓÐÈÃÄãÑ¡Ôñ£¬¸´ÖÆ»òÒƶ¯¡¡
¶ÔÏóµÄ·½·¨¡£·½·¨ÓпÉÑ¡ÔñµÄ²ÎÊýÈ·¶¨·½·¨Ö´ÐеľßÌ巽ʽ¡£ÀýÈ磬¹¤×÷²¾£¨Workbook£©¶ÔÏóÓÐÒ»¡¡
¸ö½Ð¹Ø±Õ£¨Close£©µÄ·½·¨¡£Äã¿ÉÒÔʹÓÃËü¹Ø±ÕÈκδò¿ªÁ˵Ť×÷²¾¡£Èç¹û¹¤×÷²¾ÓиĶ¯£¬Excel¡¡
»áµ¯³öÒ»¸öÐÅÏ¢£¬ÎÊÄãÊÇ·ñÒª±£´æ±ä»¯¡£Äã¿ÉÒÔʹÓùرշ½·¨ºÍÉ趨ËüµÄ±£´æ±ä»¯£¨SaveChanges£©¡¡
²ÎÊýΪ¼Ù£¨False£©À´¹Ø±ÕÕâ¸ö¹¤×÷²¾²¢ÇÒ²»¹ÜËüµÄÈκα仯¡£ÕýÈçÀý×Ó£º¡¡¡¡
Workbooks£¨¡¨Chap01¡£XLS¡¨£©¡£Close¡¡SaveChanges£º=False¡¡¡¡

6¡¡Ñ§Ï°¶ÔÏó£¬ÊôÐԺͷ½·¨¡¡¡¡

µ±ÄãѧϰеÄÊÂÎïʱ£¬ÀíÂÛ»á¸øÄã±ØÐëµÄ±³¾°£¬µ«ÊÇ£¬ÄãÈçºÎÕæÕýÖªµÀÄÇÊÇʲôÄØ£¿´ó¶àÊýÈËÏ°¹ß¡¡
ÐÎÏó˼ά£¬ÎªÁËʹExcel¶ÔÏóÒ×ÓÚÀí½â£¬VBÔÚÏß°ïÖúÌṩÁËÒ»¸ö¶ÔÏóÄ£ÐÍ£¬Çë¿´½ÓÏÂÀ´µÄ¸½Í¼¡£×¢¡¡
Ò⣬Application¶ÔÏóλÓÚÊ÷ÐÍͼµÄ×îÉ϶ˣ¬Ëüʵ¼ÊÉÏ´ú±íExcel±¾Éí¡£ÆäËü¶ÔÏóÔڽϵ͵IJã´Î¡£¡¡¡¡
¼ÙÉèÄãÏëÒª¿ØÖÆRange¶ÔÏó£¬ÔÚÄãÄܹ»¿ØÖÆÈκÎExcel¶ÔÏó֮ǰ£¬Äã±ØÐë¶ÔËü´´½¨ÒýÓá£ÎªÁË»ñµÃÏ¡¡
ͼÖеÄRange¶ÔÏó£¬Ö»Òª×ñÕÕÏÂÃ漸ÐдúÂ롣ÿ´Î¿´µ½Ê÷ÐÍͼÖеÄÏßÖ¸Ïò²»Í¬µÄ²ãʱ£¬ÄãÖ»ÒªÇÉÃî¡¡
µØ½«Ïß»»³ÉÒ»¸ö¶ºµãÔËËã·û£¨Í£¶Ù£¬Ó¢ÎÄ״̬ϵľäºÅ£©¡£ÕâÑù£¬×îÖÕÄã»áÒÔÏÂÃæµÄ·½Ê½µ½´ïRange¡¡
¶ÔÏ󣺡¡¡¡
Application¡£Workbook¡£Worksheet¡£Range¡¡¡¡
Äã¿ÉÒÔʹÓÃExcel¶ÔÏóÊ÷ÐÍͼÀ´Ñ°ÕÒµ½ÆäËü¶ÔÏóµÄ·¾¶£¬ÀýÈç´°¿Ú£¨Window£©£¬Åú×¢£¨ment£©£¬×Ô¡¡
¶¯É¸Ñ¡£¨AutoFilter£©»òÕß»æͼÇø£¨ChartArea£©¡£·ÖÎö¶ÔÏóÄ£ÐÍÊÇÒ»¸öѧϰExcel¶ÔÏóµÄ·Ç³£ºÃµÄ¡¡
·½·¨¡£Ä㻨ÔÚÕâÀïµÄʱ¼ä£¬ÒÔºóÄ㿪ʼ±àдVBA¹ý³ÌµÄʱºò£¬»á¸øÄã¼Ó±¶µÄ»Ø±¨¡£Í¨³££¬ÄãÐèÒªÃ÷¡¡
È·ÄãÒýÓõĶÔÏóµÄÃû³Æ¡£¡¡¡¡
ÏÖÔÚ£¬ÎÒÃÇÀ´µã¸ü¾ßÌåµÄ¡£¼ÙÉèÄãÒªÇå³ýµ¥Ôª¸ñA4ÀïµÄÄÚÈÝ¡£ÊÖ¶¯×öÕâ¸öʱ£¬Ö»ÒªÑ¡Ôñµ¥Ôª¸ñA4¡¡
È»ºó°´Ï¼üÅÌÉϵÄDelete¼ü¾Í¿ÉÒÔÁË¡£ÓÃVB×öͬÑùµÄ²Ù×÷£¬ÄãÊ×ÏÈÐèÒªÖªµÀÈçºÎʹExcelÑ¡ÖÐÁËÕý¡¡
È·µÄµ¥Ôª¸ñ¡£µ¥Ôª¸ñA4ºÍÆäËüµÄ¹¤×÷±íµ¥Ôª¸ñÒ»Ñù£¬ÊÇRange¶ÔÏó¡£VBûÓÐDelete·½·¨À´Çå³ýµ¥Ôª¡¡
¸ñÄÚÈÝ£¬È¡¶ø´úÖ®µÄÊÇClearContents·½·¨£¬ÀýÈ磺¡¡¡¡
Range£¨¡¨A4¡¨£©¡£ClearContents¡¡¡¡
×¢ÒâÔÚ¶ÔÏóÃû³ÆºÍ·½·¨Ö®¼äµÄ¶ºµãÔËËã·û¡£Õâ¸öÖ¸ÁîÈ¥³ýµ¥Ôª¸ñA4ÀïµÄÄÚÈÝ¡£È»¶ø£¬ÈçºÎʹExcel¡¡
Çå³ý¹¤×÷²¾Chap02¡£xlsµÚÒ»¸ö¹¤×÷±íÀïµ¥Ôª¸ñA4µÄÄÚÈÝÄØ£¿ÎÒÃÇÈÔÈ»¼ÙÉè´ò¿ªÁ˺ü¸¸ö¹¤×÷²¾¡£¡¡¡¡

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡43¡¡

¡­¡¡Ò³Ãæ¡¡60¡­

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡
ͼ2£­4¡¡Excel¶ÔÏóÊ÷ÐÍͼ£¨µÚÒ»Ò³£©£¨ÒëÕߣºÔ­Êéͼ2£­5£¨¹¤×÷²¾¶ÔÏóÊ÷ÐÍͼ£©ÒÑ°üº¬ÔÚÄÚ£¬¹ÊÔÚ¡¡
´ËÂÔ¹ý£©¡¡¡¡
Èç¹ûÄ㲻ϣÍû×îºóÔÚ´íÎóµÄ¹¤×÷²¾»ò¹¤×÷±íÀïɾ³ýÁËA4ÀïµÄÄÚÈÝ£¬ÄÇôÄã±ØÐëдÏÂÏêϸµÄÖ¸ÁÕâ¡¡
ÑùVB¾ÍÖªµÀÔÚÄÄÀïÕÒÕâ¸öµ¥Ôª¸ñ£º¡¡¡¡
Application¡£Workbooks£¨¡¨Chap02¡£xls¡¨£©¡£Worksheets£¨¡¨Sheet1¡¨£©¡¡¡£Range£¨¡¨A4¡¨£©¡£ClearContents¡¡¡¡
ÉÏÃæµÄÖ¸ÁîÓ¦¸Ãд³ÉÒ»ÐУ¬²¢ÇÒÓ¦¸Ã´ÓÓÒµ½×óÔĶÁ£ºÇå³ýµ¥Ôª¸ñA4ÀïµÄÄÚÈÝ£¬Õâ¸öµ¥Ôª¸ñÔÚÒ»¸ö½Ð¡¡
¡¡¡°Sheet1¡±µÄ¹¤×÷±íÀ¶øÕâ¸ö¹¤×÷±íÓÖÔÚÒ»¸ö½Ð¡°Chap02¡£xls¡±µÄ¹¤×÷²¾ÀïÃ棬¹¤×÷²¾¡°Chap02¡£xls¡±¡¡
ÓÖÓ¦¸ÃÊÇExcelÓ¦ÓóÌÐòµÄÒ»²¿·Ö¡£×¢Ò⣬¼¯ºÏÃû³ÆµÄºóÃæ´øÓÐÒ»¸ö×Öĸ¡°s¡±£ºWorkbooksºÍ¡¡
Worksheets¡£ËùÓÐÒýÓõŤ×÷²¾£¬¹¤×÷±í»òµ¥Ôª¸ñÃû³Æ¶¼±ØÐëÓÃÒýºÅ£¨ÒëÕߣºÓ¢ÎÄ״̬µÄÒýºÅ£©°ü¡¡
À¨ÆðÀ´¡£¡¡¡¡
ÈçºÎÕÒµ½Excel¶ÔÏóÊ÷ÐÍͼ£¿Ñ¡ÔñExcel½çÃæÉϵġ°°ïÖú¡±£­¡¡¡°Excel°ïÖú¡±£­¡°±à³ÌÐÅÏ¢¡±£­¡°Î¢¡¡
ÈíExcel¡¡VB²Î¿¼¡±£­¡°Excel¶ÔÏóÄ£ÐÍ¡±¡££¨ÒëÕߣº2002°æÓÐÈ«¾ÖµÄ¶ÔÏóÄ£ÐÍ£¬2003°æºÃÏñûÓÐÕâ¸ö¡££©¡¡¡¡
³ýÁËExcel¶ÔÏó£¬Ä㻹¿ÉÒÔʹÓÃOffice£¬FormsºÍDAO£¬ADO¶ÔÏóÄ£ÐÍ¡£ÊôÓÚÕâЩÊý¾Ý¿â£¨library£©¡¡
ÖеĶÔÏ󶼿ÉÒÔÓÃÔÚExcelÖУ¬Ò²¿ÉÒÔÓÃÔÚOffice¼Ò×åÖеÄÆäËüÓ¦ÓÃÈí¼þÖС£ÔÚÊ®ÎåÕ£¬Äã¿ÉÒÔ¿´¡¡
µ½Ê¹ÓÃDAOºÍADO¶ÔÏ󣬴ÓExcel½øÈëAccessÊý¾Ý¿âµÄÀý×Ó¡£¡¡¡¡

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡44¡¡

¡­¡¡Ò³Ãæ¡¡61¡­

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡
ͼ2£­6¡¡Excel¶ÔÏó£¨Worksheet£©¡¡¡¡¡¡
¼¼ÇÉ2£­4¡¡VBA¡¡ºÍ¡¡Excel¡¡µÄÔçÆÚ°æ±¾¡¡¡¡
ExcelÔÚÏß°ïÖúÁгöÁËExcel¶ÔÏóÄ£ÐÍ´ÓÔçÆÚ°æ±¾ÒÔÀ´µÄ±ä»¯¡£Ðí¶à¶ÔÏó£¬ÊôÐԺͷ½·¨¶¼ÒѾ­±»¸üС¡
µÄ£¬¸Ä½øµÄÌØÉ«Ëù´úÌæÁË¡£ÎªÁËÌṩ¼æÈÝÐÔ£¬±»È¡´úµÄ¶ÔÏóÒѾ­±»Òþ²ØÆðÀ´ÁË£¨ÒëÕߣºËüÃÇÈÔÈ»ÊÇ¡¡
¿ÉÓõģ©¡£´ò¿ªVB±à¼­Æ÷´°¿ÚÉϵÄÔÚÏß°ïÖú£¬Òþ²ØµÄ¶ÔÏóͬÑù¿ÉÒÔÔÚ¶ÔÏóä¯ÀÀÆ÷ÀïÕÒµ½¡£Èç¹ûÄãÔÚ¡¡
¶ÔÏóä¯ÀÀÆ÷´°¿ÚÉϵ¥»÷ÓÒ¼ü£¬Äã¿ÉÒÔÑ¡ÔñÏÔʾÒþ²Ø³ÉÔ±µÄÑ¡Ïî¡£Ä㽫ÔÚÒÔºóµÄÕ½ÚÖÐѧϰÈçºÎʹÓá¡
¶ÔÏóä¯ÀÀÆ÷¡£¡¡¡¡

7¡¡¾ä·¨ºÍÎÄ·¨¡¡¡¡

¼ÈÈ»ÏÖÔÚÄãÒѾ­ÖªµÀÁËVBAµÄһЩ»ù±¾×é³ÉÒªËØ£¨¶ÔÏó£¬ÊôÐԺͷ½·¨£©£¬ÊÇʱ¼ä¿ªÊ¼Ê¹ÓÃËüÃÇÁË¡£µ«¡¡
ÊÇ£¬ÄãÔõô½«¶ÔÏó£¬ÊôÐԺͷ½·¨Á¬½Ó³ÉÕýÈ·µÄÓïÑԽṹÄØ£¿Ã¿ÖÖÓïÑÔ¶¼ÓÐÓï·¨¹æÔò£¬ÈËÃDZØÐë×ñÑ­¡¡
Óï·¨ÒÔÈ·±£ËûÃDZ»Àí½âÁË¡£ÎÞÂÛÄã˵µÄÊÇÓ¢ÓÎ÷°àÑÀÓ·¨ÓﻹÊÇÆäËüÓïÑÔ£¬ÄãÔÚ¶Á£¬Ð´µÄʱºò¡¡
¶¼±ØÐë×ñ´ÓÒ»¶¨µÄ¹æÔò¡£ÔÚ±à³ÌÖУ¬ÎÒÃÇʹÓ᰾䷨¡±£¨syntax£©Õâ¸öÊõÓïÀ´¸üÈ·ÇеØÃ÷È·ËüµÄÓï¡¡
ÑÔ¹æÔò¡£Äã¿ÉÒÔÔÚÔÚÏß°ïÖú»òÕßÔÚ¶ÔÏóä¯ÀÀÆ÷´°¿Ú²éÕÒÿ¸ö¶ÔÏó£¬ÊôÐÔ»ò·½·¨µÄ¾ä·¨¡£ÏÂÃæÁгöÒ»¡¡
ЩÄã±ØÐëµÄVB³£ÓùæÔò£º¡¡¡¡
Èç¹ûÕâ¸öÊôÐÔûÓÐ×Ô±äÁ¿£¬Ê¹ÓÃÏÂÃæµÄ¾ä·¨£º¡¡¡¡
Object¡£Property¡¡¡¡

¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡45¡¡

¡­¡¡Ò³Ãæ¡¡62¡­

¶ÔÏóÊÇÒ»¸öռλ·û£¬ÊÇÄã·ÅÖÃÄãÏëÒª½øÈëµÄʵ¼Ê¶ÔÏóÃû³ÆµÄµØ·½¡£ÊôÐÔͬÑùÒ²ÊÇÒ»¸öռλ·û£¬Äã¿É¡¡
ÒÔÔÚÕâÀï·ÅÖøöÔÏóµÄÌص㡣ÀýÈ磺ָÏò¹¤×÷±íÖе¥Ôª¸ñA4ÖÐÊäÈëµÄÖµ£¬¼ûÏÂÊöÖ¸Á¡¡¡¡
Range£¨¡¨A4¡¨£©¡£Value¡¡¡¡
×¢Òâ¶ÔÏóÃû³ÆºÍÊôÐÔÖ®¼äµÄ¾äºÅ¡£µ±ÄãÐèÒª½øÈëÒ»¸ö´æÔÚÓÚ¶à¸öÆäËü¶ÔÏóÀïµÄ¶ÔÏóµÄÊôÐÔʱ£¬Äã±Ø¡¡
Ð밴˳ÐòµØдÉÏËùÓжÔÏóµÄÃû³Æ£¬²¢ÇÒÓ᡾äºÅÔËËã·û·Ö¿ª¡£ÀýÈ磺¡¡¡¡
ActiveSheet¡£Shapes£¨2£©¡£Line¡£Weight¡¡¡¡
Õâ¸öÀý×ÓÖ¸Ïòµ±Ç°¹¤×÷±íÀïͼÐΣ¨Shapes£©¼¯ºÏÀïµÄµÚ¶þ¸ö¶ÔÏóÀïµÄÖ±Ïߣ¨Line£©¶ÔÏóµÄ´Öϸ¡¡
¡¡£¨Weight£©ÊôÐÔ¡£¡¡¡¡
ÓÐЩÊôÐÔÒªÇóÒ»¸ö»ò¶à¸ö×Ô±äÁ¿¡£ÀýÈ磬ʹÓÃÆ«ÒÆ£¨Offset£©ÊôÐÔ£¬Äã¿ÉÒÔÑ¡ÔñÒ»¸öºÍµ±Ç°µ¥Ôª¸ñ¡¡
Ïà¶ÔλÖõĵ¥Ôª¸ñ¡£OffsetÊôÐÔÐèÒªÁ½¸ö×Ô±äÁ¿£¬µÚÒ»¸ö×Ô±äÁ¿ÎªÐкţ¨rowOffset£©µÚ¶þ¸öÊÇÁС¡
ºÅ£¨columnOffset£©¡£¡¡¡¡
¡¡¡¡¡¡¶ÔÏó¡¡¡¡¡¡¡¡¡¡¡¡¡¡ÊôÐÔ¡¡¡¡×Ô±äÁ¿¡¡¡¡
ActiveCell¡£Offset£¨3£»¡¡2£©¡¡¡¡
ÔÚÉÏÃæµÄÀý×ÓÖУ¬¼ÙÉ赱ǰµ¥Ôª¸ñÊÇA1£¬Offset£¨3£»¡¡2£©½«»áÖ¸ÏòÍùÏÂ3ÐкÍÍùÓÒÁ½Áеĵ¥Ôª¸ñ£¬Ò²¡¡
¾ÍÊǵ¥Ôª¸ñC4¡£ÒòΪ£¬ÔÚÀ¨ºÅÄÚµÄ×Ô±äÁ¿×ÜÊǺÜÄÑÀí½â£¬Í¨³£²Ù×÷Êǽ«ËüÃǵÄÃû³ÆÒ²ÁÐÉÏ£¬¼ûÏÂÀý£º¡¡¡¡
ActiveCell¡£Offset£¨rowOffset£º=3£»¡¡columnOffset£º=2£©¡¡¡¡
×¢Ò⣬×Ô±äÁ¿Ãû³ÆºóÃæ×ÜÊǸú×ÅÒ»¸öðºÅºÍÒ»¸öµÈÓںţ¨£º=£©¡£Èç¹ûÄãʹÓôøÃû³ÆµÄ×Ô±äÁ¿£¬Äã¿É¡¡
ÒÔÈÎÒâ˳ÐòµØÁгöËüÃÇ£¬ÉÏÃæµÄÖ¸ÁîÒ²¿ÉÒÔд³ÉÕâÑù£º¡¡¡¡
ActiveCell¡£Offset£¨columnOffset£º=2£»¡¡rowOffset£º=3£©¡¡¡¡
¸ÄºóµÄÖ¸ÁîûÓиıäÒâ˼£¬ÄãÈÔȻָÏòµ¥Ôª¸ñC4¡£È»¶ø£¬Èç¹ûÄã¸Ä±äActiveCell¡£Offset£¨3£»¡¡2£©ÖС¡
×Ô±äÁ¿µÄ´ÎÐò£¬½á¹ûÄã»áÖ¸ÏòD3£¬¶ø²»ÊÇC4¡£¡¡¡¡
Object¡£Property¡¡=¡¡Value¡¡¡¡
ValueÊÇÒ»¸öеÄÄãÒª¸³¸ø¸Ã¶ÔÏóÊôÐÔµÄÖµ¡£Õâ¸öÖµ¿ÉÒÔÊÇ£º¡¡¡¡
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡Range£¨¡¨A4¡¨£©¡£Value¡¡=¡¡25¡¡¡¡
¡¡¡¡¡¡¡¡ÉÏÃæµÄÖ¸ÁîÔÚµ±Ç°¹¤×÷±íµÄµ¥Ôª¸ñA4ÀïÊäÈëÊý×Ö25¡¡¡¡
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡ActiveCell¡£Font¡£Name¡¡=¡¡¡¨Times¡¡New¡¡Roman¡¨¡¡¡¡
¡¡¡¡¡¡¡¡ÉÏÃæµÄÖ¸Áµ±Ç°µ¥Ôª¸ñ×ÖÌå¸ÄΪTimes¡¡New¡¡Roman¡¡¡¡
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡ActiveCell¡£Font¡£Bold¡¡=¡¡True¡¡¡¡
¡¡¡¡¡¡¡¡ÉÏÃæµÄÖ¸ÁîÉèÖ
·µ»ØĿ¼ ÉÏÒ»Ò³ ÏÂÒ»Ò³ »Øµ½¶¥²¿ ÔÞ£¨0£© ²È£¨0£©
δÔĶÁÍꣿ¼ÓÈëÊéÇ©ÒѱãÏ´μÌÐøÔĶÁ£¡
ÎÂÜ°Ìáʾ£º ο´Ð¡ËµµÄͬʱ·¢±íÆÀÂÛ£¬Ëµ³ö×Ô¼ºµÄ¿´·¨ºÍÆäËüС»ï°éÃÇ·ÖÏíÒ²²»´íŶ£¡·¢±íÊéÆÀ»¹¿ÉÒÔ»ñµÃ»ý·ÖºÍ¾­Ñé½±Àø£¬ÈÏÕæдԭ´´ÊéÆÀ ±»²ÉÄÉΪ¾«ÆÀ¿ÉÒÔ»ñµÃ´óÁ¿½ð±Ò¡¢»ý·ÖºÍ¾­Ñé½±ÀøŶ£¡