ªð¦^¦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 : ¡i®É¶¡¦¨´N¤@¤Á¡j®É¶¡¥i¥H³y´N¤H®æ¡A¥i¥H¦¨´N¨Æ·~¡A¤]¥i¥HÀx¿n¥\¼w¡C
ªð¦^¦Cªí ¤W¤@¥DÃD