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

[µo°Ý] ·í¨Ï¥ÎOFFSET»yªk®É, ¦p¦ó¶K¦¨­È

¦^´_ 1# xoofer

¸Õ¸Õ¬Ý
  1.     With Range("G1")
  2.         .Copy
  3.         .Offset(0, 1).PasteSpecial Paste:=xlPasteValues
  4.     End With
½Æ»s¥N½X
PKKO

TOP

        ÀR«ä¦Û¦b : ¤ß¤¤±`¦sµ½¸Ñ¡B¥]®e¡B·P«ä¡Bª¾¨¬¡B±¤ºÖ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD