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

[µo°Ý] ¦h±ø¥ó¶i¶¥¿z¿ï§Ö³t¤èªk

[µo°Ý] ¦h±ø¥ó¶i¶¥¿z¿ï§Ö³t¤èªk

¶i¶¥¿z¿ï.rar (21.8 KB)

¥IÀɤ¤¦³2­¶­±¡A¤@¬°®w¦s­¶­±¡A¥t¤@¬°¶i¶¥¿z¿ï±ø¥ó¤Îµ²ªG¡A
¥Ø«e·Q¨Ï¥Î¥¨¶°¶]¥Xµ²ªG¡A°¾°¾¥d¦b²Ä¤@¨B±ø¥ósku¸Ì¡A¨C¦¸sku¬Ò·|¤£¦P®æ¼Æ¡A
¤]µLªk±N²Ä¤G¨B±ø¥ó¤@¨Ö¨Ï¥Î¡A©Ò¥H´N¤À¤F¤G¬q¡A½Ð±Ð¬O§_¦³¤èªk¥i¥H§JªA²Ä¤@¨B±ø¥ó¡A
¤Îª½±µ¥[¤J²Ä¤G¨B±ø¥ó
·PÁ¡I

³Â·Ð¦U¦ì«e½ú±Ð±Ð§Ú³oÃD¸Ó¦p¦ó¸Ñ~

TOP

¨º§Ú·Q°Ý»¡¤U­±¬õ¦r³¡¥÷­n¦p¦ó­×§ï¿ï¨ú®æ¤l¤º¦³ªF¦èªº½d³ò¶Ü?
¦]¬°¨C¦¸Sku±ø¥ó¬Ò¤£¦P

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

TOP

        ÀR«ä¦Û¦b : ¤£©È¨Æ¦h¡A¥u©È¦h¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD