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

¿z¿ï«á,±NÀx¦s®æ¸ê®Æ½Æ»s¨ì¨ä¥¦ªÅ¥ÕÀx¦s®æ(¤wª¦¤å

With ActiveSheet.AutoFilter.Range
¡@¡@¡@.AutoFilter Field:=1, Criteria1:="AA"
¡@¡@¡@.Offset(1).Copy [E14]
¡@¡@¡@.AutoFilter Field:=1
End With

TOP

        ÀR«ä¦Û¦b : ¡i¦æµ½­n¤Î®É¡j¦æµ½­n¤Î®É¡A¥\¼w­n«ùÄò¡C¦p¿N¶}¤ô¤@¯ë¡A¥¼¿N¶}¤§«e¤d¸U¤£­n°±º¶¤õ­Ô¡A§_«h­«¨Ó´N¤Ó¶O¨Æ¤F¡C
ªð¦^¦Cªí ¤W¤@¥DÃD