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

[µo°Ý] ¬O§_¥i¥H²¤Æ¿ý»s«áªºVBA »yªk

¥»©«³Ì«á¥Ñ ML089 ©ó 2021-6-30 09:38 ½s¿è

³o¬O D:D ¸ê®Æ½Æ»s¤£­«½Æ¸ê®Æ¦Ü P:P¡A¦³§tªíÀY


Sub Macro2()
    Columns("D:D").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Columns( "P:P"), Unique:=True
End Sub
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

        ÀR«ä¦Û¦b : ¤f»¡¤@¥y¦n¸Ü¡A¦p¤f¥X½¬ªá¡F¤f»¡¤@¥yÃa¸Ü¦p¤f¦R¬r³D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD