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

·Q½Ð°Ý¤j¤j¦p¦ó§âÀx¦s®æ¸ê®Æ¹ï´«¡H

  1. Sub ¹ï´«()
  2. a = Range(Selection.Areas(1).Address)
  3. b = Range(Selection.Areas(2).Address)
  4. Range(Selection.Areas(1).Address) = b
  5. Range(Selection.Areas(2).Address) = a
  6. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ½_ÁJµ²±o¶V¹¡º¡¡A¶V·|©¹¤U««¡A¤@­Ó¤H¶V¦³¦¨´N¡A´N­n¶V¦³Á¾¨Rªº¯ÝÃÌ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD