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

Åܰʽd³ò¦WºÙ

  1. Sub zz()
  2. Dim myRng As Range
  3. Set myRng = Selection
  4.     ThisWorkbook.Names.Add "DataRange", myRng
  5. End Sub
½Æ»s¥N½X

zz.zip (15.64 KB)

TOP

        ÀR«ä¦Û¦b : ¦³Ä@©ñ¦b¤ß¸Ì¡A¨S¦³¨­Åé¤O¦æ¡A¥¿¦p¯Ñ¥Ð¤£¼½ºØ¡A¬Ò¬OªÅ¹L¦]½t¡C
ªð¦^¦Cªí ¤W¤@¥DÃD