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

Excel VBAµ{¦¡°õ¦æ¦³®É·|ÅܫܺC

Excel VBAµ{¦¡°õ¦æ¦³®É·|ÅܫܺC

¤j®a¦n¡A
·Q½Ð±Ð¤j®a¬O§_¦³¹J¨ì»P§Ú¬Û¦Pªº°ÝÃD¡A¬O§_ª¾¹Dµo¥Íªº­ì¦]¡H­Y¬O¦³ª¾¹Dªº¡A¥i§_§iª¾§Ú¡A·PÁ±z
¬Û¦Pªºµ{¦¡¡A¬ðµM°õ¦æ°_¨Ó¥Ñ¤@¤ÀÄÁ¡AÅܦ¨¤Q¤@¤ÀÄÁ¡A§Ú¤£½T©w¬O«ç»ò¦^¨Æ¡A¦ý¬O³o¼Ëªº±¡ªp«ùÄò¤F¤@¬q®É¶¡¡Aª½¨ì§Ú¤µ¤Ñ·Q§ä­ì¦]¡A±Nµ{¦¡¥[¤W¤À¬qªº°õ¦æ®É¶¡°O¿ý«á¡A´ú¸Õ¤F¤G¦¸¤SÅܦ^¤@¤ÀÄÁ
¦Ó§Ú³Ìªñ¤]¦³³°Äòµo²{¦³®Éµ{¦¡·|°õ¦æªº¸ûºC¡A¦ý¬O§Ú±N¦Uµøµ¡ªºExcel³£Àɮ׫á¦A°õ¦æ¤SÅÜ¥¿±`
§Ú¤£½T©w¬O§_»P¤U¦C±¡ªp¦³Ãö
¤@¡BExcelªºª©¥»Åܬ°2016¡AExcelÀɮפ§«eªº¶}±Ò³£·|¦b¦P¤@­ÓExcelµøµ¡¤º¡A²{¦b¶}©lÅܦ¨¦h­Ó¤£¦Pªºµøµ¡
¤G¡B¤½¥q¾É¤J¤FOffice 365

§ÚªºVBA°õ¦æ«e³£¦³¥ý±N
ScreenUpdating=False
Calculation§ï¬°¤â°Ê§ó·s

ÁٽФj®a­Y¬O¦³·Q¨ì¥i¯àªº­ì¦]¡A¥i¥HÅý§Úª¾¹D¦n§ï¶i¡A·PÁ±z
clio

¦^´_ 1# clio


    ³o¤]­nÀɮפ~¯àª¾¹DªºÀ£
   ¤£µM´NÅܦ¨¥þÅé³qÆF¤jÁɤF

³qÆF1.¹L¦hªÅ¥ÕÀx¦s®æ²£¥Í®æ¦¡  ¥Îctrl+¤W©Î¤U  §âªÅ¥Õªº¦ì¸m¥þ³¡§R°£¤@¹M(­n¥Î§R°£¾ã¦C ¤£¯à¥Îdelete) ¦Ó¥B§R§¹­nÀx¦s¤@¹M­«¶}
           ·|³y¦¨³o°ÝÃD¥i¯à¥Î¨ì³\¦hselect ¸òdelete ©ÎªÌ¾ãÄæ¾ã¦CÅÜ´«®æ¦¡ ³y¦¨

³qÆF2.°j°é©w¦ìÄƨ«¤F ¥i¯à¸ò1¦³Ãö  ¤]¥i¯à¬O©w¦ì¦³Ãö F8Àˬd°j°é±q¦h¤Ö¨ì¦h¤Ö

³qÆF3.¤£¤p¤ß³]¤F¾ã¦C©ÎªÌ¾ãÄæ®æ¦¡ µM«á¨S§R°®²b ³y¦¨ÀÉ®×¹LªÎ  ª`·NÀɮ׬O¤£¬O­D«Ü¦h

TOP

¦^´_ 1# clio


1. ¦n¹³¬O§A¦b¬Y¤@­ÓÀɮתº¶}±Ò®É, ¤S±NÀç¹õ§ó·sÃö³¬©Î¤â°Ê­pºâªºª¬ºA§ïÅܤF!
      ¦h¸ÕµÛ¦b¶}¬YÀɮפ§«á, ¦A¤U¤@¦¸Àç¹õ§ó·sÃö³¬©Î¤â°Ê­pºâªº°Ê§@, ¬Ý¬O§_¤´¬O¤@¼Ë?

2. ¸ÕµÛ¦b¨C¤@­Óµ{¦¡¬q¸¨, ¥[¤W³B²z®É¶¡ªº°O¿ý©ÎÅã¥Ü, ¬Ý¬O¨º¤@­Óµ{¦¡¬q³y¦¨ªº,
     «áÄò·|§ó®e©öDebug.
·s¤â¤W¸ô¡A½Ð¦h¥]²[¡C

TOP

¦^´_ 2# singo1232001
singo1232001, ·PÁ±zªº¦^Âд£ÂI¡A¤]¬O§Úªº°ÝÃD¡A§Ú¨S¦³»¡²M·¡¡A°õ¦æªºµ{¦¡»PÀɮ׳£¬O©T©wªº¡A©Ò¥H±z´£ªº¨º´XÂI¡A°õ¦æªºÀÉ®×°ÝÃDÀ³¸Ó¬O¤£·|µo¥Íªº¡A¨SÃö¨t¡A§Ú¦A§ä¬Ý¬Ý°ÝÃDÂI¡A·PÁ±zªº¦^ÂСC
clio

TOP

¦^´_ 3# ¼B¤j­G
¼B¤j­G¡A·PÁ±zªº´£ÂI¡A²Ä¤@ÂI¨ì¬O§Ú¨S¸Õ¹L¡A§Ú¦A¨Ó´ú¸Õ¬Ý¬Ý¡A²Ä¤GÂI¤è¦¡§Úı±o®¼¦nªº¡A§Ú¦A¨Ó¸Õ¸Õ¡A¤Ó·PÁ±z¤F
clio

TOP

§Ú¤§«e¹J¹L¤@ºØ±¡§Î, ¬O¦]¬°VBA¼g¦b ThisWorkbook¤º, ¨º¬qµ{¦¡¤S¬O¦bÀH®É§ì´å¼Ðªº¦ì¸mªº, ¥H­P©ó°Ê¤@¤U´å¼Ð´N¶]¤@¦¸.. ºC¨ìÃz.... ©Ò¥H§A¤]³\¥i¥HÀˬd¬O§_¦³Ãþ¦üªº±¡§Î.

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡¦pÆp¥Û¡j®É¶¡¹ï¤@­Ó¦³´¼¼zªº¤H¦Ó¨¥¡A´N¦pÆp¥Û¯ë¬Ã¶Q¡F¦ý¹ï·M¤H¨Ó»¡¡A«o¹³¬O¤@§âªd¤g¡A¤@ÂI»ù­È¤]¨S¦³¡C
ªð¦^¦Cªí ¤W¤@¥DÃD