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

¦p¦ó¿z¿ï¤£¥]§t¸ê®Æ

¦^´_ 3# enoch
¥Î¶i¶¥¿z¿ï
  1. Sub ex()
  2. '·Ç«h°Ï°ìB1:D2
  3. [B1].Resize(, 3) = [A1]
  4. [B2].Resize(, 3) = Array("<>A", "<>B", "<>C")
  5. Range("A1").CurrentRegion.AdvancedFilter xlFilterInPlace, [B1].Resize(2, 3)
  6. [B1].Resize(2, 3) = ""
  7. End Sub
½Æ»s¥N½X
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : µÊ®ð¼L¤Ú¤£¦n¡A¤ß¦a¦A¦n¤]¤£¯àºâ¬O¦n¤H¡C
ªð¦^¦Cªí ¤W¤@¥DÃD