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

[µo°Ý] Excel2003 remove duplicates¬Û®e©Ê°ÝÃD

¥»©«³Ì«á¥Ñ ­ã´£³¡ªL ©ó 2018-9-10 13:18 ½s¿è

¦^´_ 7# sunshine010

1) ¥h­«ÂÐ, À³¸Ó¥u°w¹ïBÄ檺[®É¶¡]³B²z, ­Y³vÄæ³B²z, ¨º³Ì«áªº¸ê®Æ¤]¤£¥¿½T
2) VBA¥H[¤½¦¡­«ºâ]IJµo, ¦P®É¶¡°O¿ýªº¸ê®Æ¤@©w·|­«ÂЫܦhµ§, ³o¬OWorksheet_Calculateªº¹ú¯f
3) §R°£­«ÂЦP®É¤SIJµoµ{¦¡, ¤]·|³y¦¨¤£¥i¹w®Æªº¿ù»~

®Ú¥»¸Ñ¨M¤èªk:
³]¤@¼È¦s¦C, ¦s©ñ¤W¤@µ§°O¿ýªº¤º®e, ¦A¥Î¤@­Ó¤½¦¡§PÂ_¸ê®Æ¬O§_¦³ÅÜ°Ê,
­YµLÅÜ°Ê, §Y¨Ï¤½¦¡­«ºâ¤]¤£°O¿ý, ³o¼Ë®Ú¥»¤£¶·¦A¥h°õ¦æ§R°£­«ÂÐ

³oDDE«D§Ú©Òªø, À°¤£¤W¦£~~

TOP

°ò¥»¬[ºc:
1) AH1 ©ñ¸ê®ÆÅÜ°ÊÀË´ú¤½¦¡, ­Y¦³ÅÜ°Ê, «h¥[¤@µ§·s°O¿ý,     
    ¨Ò¥~:B2:AG2¦³[¿ù»~­È]®É, ©Î B2 «D¼Æ­È(¨S¦³®É¶¡­È), «h¤£°O¿ý~~
2) ¦bB3:AG3¦P®É¦s©ñ³oµ§°O¿ý, ¨Ñ¤U¦¸¤ñ¹ï¬O§_ÅÜ°Ê
3) A3²Ö­pµ§¼Æ, ¦P®É°O¿ý¨ìMAINªí¬Û¹ïÀ³Àx¦s®æ

³o»ò¦hªí¦P®ÉIJµoµ{¦¡, ·|¤£·|¥´¬[.²£¥Í¿ù»~.©Îº|°O¿ý, ¤£±o¦Óª¾,
¦Û¦æ¥h´ú, ¨Ã¨Ì¹ê»Ú¹B¥Î¥h¦Û¦æ­×§ï¤½¦¡©Îµ{¦¡, ¯àÀ°ªº´N³o¼Ë:
DDE_main_01.rar (40.1 KB)

TOP

Sheets(1).Cells(Me.Index + 1, 2) = [A3]
§ï¦¨¥H¤U¤~¹ï:
Sheets(1).Cells(Me.Index, 2) = [A3]

TOP

        ÀR«ä¦Û¦b : ¥Ç¿ù¥XÄb®¬¤ß¡A¤~¯à²M²bµL·Ð´o¡C
ªð¦^¦Cªí ¤W¤@¥DÃD