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

½Ð±ÐVBA ¥X²{ 400°ÝÃD

¦^´_ 3# jsc0518
¤£¥Î.Selectªº
  1. Sub S8()

  2.     Columns("A").Copy
  3.     Columns("B").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
  4.         :=False, Transpose:=False

  5. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¦Û¤v®`¦Û¤v¡A²ö¹L©ó¶ÃµoµÊ®ð¡C
ªð¦^¦Cªí ¤W¤@¥DÃD