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

½Ð°ÝSHEETÂà´«¬ö¿ýªº°ÝÃD

½Ð°ÝSHEETÂà´«¬ö¿ýªº°ÝÃD

1.½Ð°Ý¤@¤U,¦p¦ó±NA SHEET¦s¨ìB SHEET·íJÄ榳¥X²{¥ô¦ó­È®É¹ïÀ³ªº¸Ó¦C´N·|½Æ»s¨ìB SHEET(ªÅ¥Õ³B©µ¦ù)¤¤


2.¥t¤@ºØ¬O·í«ö¤U«ö¶s®É(¹ïÀ³¤u³æ¸¹½X),«h¸Ó¤u³æ¹ïÀ³ªº©Ò¦³¦C´N½Æ»s¨ìB SHEETªÅ¥Õ³B

B SHEET­n¤@ª½²Ö¥[,¤£¯à¯dªÅ¥Õ
ÁÂÁÂ

Book1111.rar (38.99 KB)

Tony

¥»©«³Ì«á¥Ñ tonycho33 ©ó 2012-2-14 18:46 ½s¿è

¦^´_ 2# GBKEE


    ½Ð°Ý¡y1.½Ð°Ý¤@¤U,¦p¦ó±NA SHEET¦s¨ìB SHEET·íJÄ榳¥X²{¥ô¦ó­È®É¹ïÀ³ªº¸Ó¦C´N·|½Æ»s¨ìB SHEET(ªÅ¥Õ³B©µ¦ù)¤¤¡z
¦³­Ó°ÝÃD²Ä¤@¦¸¿é¤JJÄæ®É¬Y¤@®æÀx¦s®æ¥i¥H¬ö¿ý
               ²Ä¤G¦¸¦A¿é¤J®É¡A¦]¬°­ì¥»²Ä¤@¦¸ÁÙ¦b¡A©Ò¥H·|¦b­«½Æ°O¿ý¨ì
¥i¥H§PÂ_¦³­«½Æªº¸Ü´N¤£·|¬ö¿ý¶Ü
¥t¥~½Ð°Ý
Data_Copy 10, xText

Data_Copy 1, xText
¬°¤°»ò¬O1©M10®t¦b­þ

ÁÂÁÂ
Tony

TOP

¥»©«³Ì«á¥Ñ tonycho33 ©ó 2012-2-15 10:36 ½s¿è

¦^´_ 4# GBKEE

¯u¤£¦n·N«ä
«D±`·PÁ§Aªº«ü¾É
½Ð°Ý¡y ¦³¿z¿ï­«½Æªº­n§R±¼¡z­n¦p¦ó­×§ï
ÅýB sheet ¥X²{³æ¤@ªº¹ïÀ³Äæ¦ì´N¦n
  1. Sub §R°£­«½Æ1()
  2. Dim i As Long
  3. Application.ScreenUpdating = False
  4. For i = Range("a65536").End(xlUp).Row To 3 Step -1
  5.   If WorksheetFunction.CountIf(Range("a2:a" & i), Cells(i, 1)) > 1 Then
  6.     Cells(i, 1).EntireRow.Delete
  7.   End If
  8. Next
  9. Application.ScreenUpdating = True
  10. End Sub
½Æ»s¥N½X
³o­Ó¬O¤ñ¹ïAÄæ­«½Æªº
¦pªG§Ú·Q§ï¤ñ¹ïAÄæ¡®CÄæ­«½Æªº­n¦p¦ó­×§ï©O
ÁÂÁÂ
Tony

TOP

¦^´_ 7# GBKEE

¤£¦n·N«ä¥i¥H¦b½Ð±Ð¤@­ÓÃþ¦üªº°ÝÃD¶Ü
§Ú·Q±Naa sheet°O¿ý¨ìbb sheet
±ø¥ó¬O¦baa sheet¹ïÀ³ªºt Ä榳¥X²{­Èªº¸Ü
´N±N¹ïÀ³ªºA¨ìRÄ橹¤U3¦C½Æ»s¨ìbb sheet
¦ý¬O¸ê®ÆÁÙ­n«O¯d/¤£­n§R°£

¨Ò¦p¡G·íT3¥X²{"¤w±Æµ{"®É«hA3¨ìR5 ¤T¦Ccopy¨ìbb sheet¤¤ ªÅ®æ³B
¦ý¬OA3¨ìR5¤£­n§R°£
±µ¤U¨Ó´N¥H¦¹Ãþ±À¥i¥H¥é·Ó³o¼Ë°O¿ý

ÁÂÁÂ

Book1.rar (21.19 KB)

Tony

TOP

¦^´_ 9# GBKEE


    ³Â·ÐÁÂÁÂ

Book1.rar (21.29 KB)

Tony

TOP

¥»©«³Ì«á¥Ñ tonycho33 ©ó 2012-2-16 15:43 ½s¿è

¦^´_ 12# GBKEE
¦^´_ 11# register313
FÄæ¬O¸ê®ÆÄæ,ÁôÂÿù¤F
EÄæ¬O¹w¯dÄæ¦ì

½Ð±Ð¤@¤U
¤§«e¸ß°Ý¹Lªº°ÝÃD­n·J¾ã
aa¡÷bb ¬O·íTÄæ¿é¤J¡y¤w±Æµ{¡z«h¶×¤Jbb,¨Ã¥i¥H¤@µ§¤@µ§·s¼W,¤wok
bb¡÷cc ¥Ø«e¬O¥u¯àÄæ¦ìÂà´«,¥i§_·íbb¦³·s¼W®É,cc¤]¥i¥H¤@µ§¤@µ§·s¼W,½Ð¨ó§U
´N¬O·íaa·s¼W¤@µ§TÄæ¿é¤J¡y¤w±Æµ{¡z,¸Óµ§3¦C·|Âà¤Jbb³Ì«á3¦C,¤§«áÂà´«¨ìcc®É,¥uÂà³o¤@µ§,¤£·|¥þ³¡¤@°_Âà´«,¨Ã±Æ¦b³Ì¤U¤è
cc¡÷dd «h¬O¤§«e´£°Ýªº¥\¯à,¥i¥H¤@µ§¤@µ§·s¼Wdd,¤wok


©Ò¥H³Â·Ð²Ä¤G¶µ¥\¯à¥i¥H¨ó§U
ÁÂÁÂ

Book1.rar (30.67 KB)

Tony

TOP

¦^´_ 14# register313


    ·PÁ¨ó§U,³o¼Ëªº°µªkªº½T¤ñ§Ú·Q±oÁÙ¦n«Ü¦h
  ·PÁÂ
Tony

TOP

        ÀR«ä¦Û¦b : ¦Y­W¤F­W¡B­WºÉ¤Ü¨Ó¡A¨ÉºÖ¤FºÖ¡BºÖºÉ´d¨Ó¡C
ªð¦^¦Cªí ¤W¤@¥DÃD