ªð¦^¦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 : ¤Ó¶§¥ú¤j¡B¤÷¥À®¦¤j¡B§g¤l¶q¤j¡A¤p¤H®ð¤j¡C
ªð¦^¦Cªí ¤W¤@¥DÃD