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

[µo°Ý] ¦p¦ó¶×¤JEXCEL¸ê®Æ?

¸Õ¸Õ VBA TEST 5.rar (114.53 KB)

TOP

PI_PO Records.rar (17.62 KB)

TOP

¨ú¤£¨ìªº­ì¦]¬O¨ä¥LÀx¦s®æ¤]¦³"total"¦r¼Ë¦s¦b¡A¥i¥H´«­Ó¤è¦¡¡C VBA TEST 5.rar (185.21 KB)

TOP

¥[¤W³o¤@¦æ¥iÁ׶}¸Ó¹ï¸Ü
Application.DisplayAlerts = False
­n´£°ª®Ä²v±o­n¤U¥\¤Ò¡A¦pÀɮצW½T¹ê¶ñ¦n¡A¤£­n¥u¶ñ³¡¥÷¦A¨Ó¥Îµ{¦¡¤@­Ó­Ó¤ñ¹ïÀɮצW
¸ê®Æ­n³W½d¡A¤×¨ä§@¬°§PÂ_ªº±`¼Æ¡A¤£¯à¦³¨Ç¥[ªÅ®æ¦³¨Ç¤£¥[¡A¦³¨Ç¦³«_¸¹¦³¨Ç¨S¦³µ¥µ¥¼W¥[¬d¸ß§xÃø«×¡C
³Ì¦n°µ°µÄæ¦ì³£¤@¼Ë¡A¤£­nÅܨÓÅÜ¥h¡C

TOP

­Y¸ê®Æ¤£¯à³W½d¡A¥u¯àÀHµÛ¸ê®ÆªºÅܤƤ£Â_ªº§ïµ{¦¡¡A¨º¤£¬O«Ü¨¯­W¡H
¨Ò¦p©p«á¨Óªº´X­ÓÀɮסAQUANTITY»P¼Æ¶qªº¼Æ¦r¤£¦b¦P¤@Äæ¡A¥HQUANTITY§PÂ_Äæ¦ì¡A¥¿½Tªº¼Æ¶q´N¨ú¤£¨ì¤F
¦P®ÉTOTAL,QUANTITY¨â­Ó¦r²Å³£¦s¦b¤£©w¼ÆªºªÅ¥ÕÁä¡A¼Ò½k¬d§ä´N¦³¥X¿ùªº¾÷·|
¤S¨Ò¦p©p¤@¼Ó»¡"TOTAL"¦bAÄæ¡A¦ý¤S¦³¨Ç¬O¦bBÄ檺¡A¦P®ÉBÄæ¤S¦³¥]§t"TOTAL"¦r²ÅªºÀx¦s®æ¡A¬d§ä®É´N¥ý§ä¨ì¿ù»~ªº¦ì¸m¤F¡C
¥Ø«e§Ú·Q§ïÅܤ@¤U¨ú±o"TOTAL"ªº¦C¸¹¡A¸Ó¦C³Ì¥k¬Oª÷ÃB¡A­Ë¼Æ²Ä¥|Äæ¬O¼Æ¶q¡A³o¼Ë¥i¯à·|·Ç½T¨Ç
¨C­ÓÀɮ׶}±Ò»PÃö³¬³£¶·­n®É¶¡¡A­YÀɮפj¶}±Ò§óºC¡A©Ò¥H©µ¿ð­Ó´X¬í¬O«Ü¥¿±`ªº¡C°£«D©p¯à³W¹º¥X©T©wªºÀx¦s®æ©ñ¸m³o¨â­Ó¼Æ¦r¡A³o¼Ë¥i¥H¤£¶}±Òª½±µ¨ú­È¡C
Àɮ׳̦n¥Î¥þ¦W¡A§_«h¼Ò½k¤ñ¹ï¤]¥i¯à¥X¿ù¡C
ªþ¥ó¨Ñ°Ñ¦Ò
VBA TEST 5.rar (306.8 KB)

TOP

³o­Ó­nÂç²M¤@¤U
aÄæ»PfÄæ³£¬O©p¦Û¤v¿é¤Jªº¶Ü¡H´N¨Ì·Ó©p¿é¤Jªº¶¶§Ç¡H

TOP

¨º³o¼ËÁÙ¤£¬O­n¨Ì·ÓaÄ檺¶¶§Ç¦b¸ê®Æ§¨¤¤´`Àô¤ñ¹ï§ä¥XÀÉ®×¥þ¦W©ñ¦bfÄæ¡H

TOP

PI_PO Records.rar (34.25 KB)

TOP

½Ðª`·N³o­Ó
If Application.CountA(Rows(a.Row)) = 1 Then    'a:eÄæ¤w¦³¼g¤J¸ê®Æ´N¸õ¹L
³o¦æ­­¨î¤F¥u¦³FÄ榳¼Æ¾Ú¤~°õ¦æ¡AA~E¤£­n¦³¥ô¦óªF¦è¡C

TOP

PO¤u§@ªíªí¦W¦³°ÝÃD¡A­«·s©R¦W´N¥i¥H¤F
¤]³\¦h¤FªÅ¥Õ®æ¡A¤]³\¬O¥þ«¬ªº§Ú¨S«Üª`·N¡C VBA TEST 5-answer 5.rar (122.42 KB)

TOP

        ÀR«ä¦Û¦b : «Î¼e¤£¦p¤ß¼e¡C
ªð¦^¦Cªí ¤W¤@¥DÃD