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

[µo°Ý] ­×§ï±ø¥ó½d³ò

[µo°Ý] ­×§ï±ø¥ó½d³ò

½Ð°Ý¤U­±¬õ¦r³¡¥÷­n¦p¦ó­×§ï¿ï¨ú®æ¤l¤º¦³ªF¦èªº½d³ò¶Ü?
¦]¬°¨C¦¸±ø¥ó½d³ò¬Ò¤£¦P¡A¤U¦C½d³òA2~A39¡A¤£­n¨C¦¸¤£¦P³£­n°µ­×§ï
½Ð±Ð¦U¦ì¦³¦ó¸Ñ¨M¤èªk~

Range("E1:H1").Select
Sheets("®w¦s").Columns("A").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("A2:A39"), CopyToRange:=Range("E1:H1"), Unique:= _

¦^´_ 1# home1913

Sheets("®w¦s").Columns("A").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("A2:A39"), CopyToRange:=Range("E1:H1"), Unique:= _

§ï¦¨
Sheets("®w¦s").Columns("A").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range([A2],[A65535].End(xlUp)), CopyToRange:=Range("E1:H1"), Unique:= _
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

¦^´_ 2# softsadwind

·PÁ±оɡA½Ð°Ý³o¬q·N«ä­n«ç»ò»¡©ú   Range([A2],[A65535].End(xlUp)

TOP

¦^´_ 3# home1913

   §A¥Îselect³æ¿W¾Þ§@¤U­±³o¤@¥y
  µM«á¨C¸Õ¤@¤U¦bAÄæ·s¼W¸ê®Æ
  ¬Ý¬ÝÅܤÆ

    Range([A2],[A65535].End(xlUp).select
¦r¨å¨â¦U¦r ÁÙ¯uÃø²z¸Ñ

TOP

        ÀR«ä¦Û¦b : ¤H­nª¾ºÖ¡B±¤ºÖ¡B¦A³yºÖ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD