ªð¦^¦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 : ¤@­Ó¤H¤£©È¿ù¡A´N©È¤£§ï¹L¡A§ï¹L¨Ã¤£Ãø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD