ªð¦^¦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 : ·R¤£¬O­n¨D¹ï¤è¡A¦Ó¬O­n¥Ñ¦Û¨­ªº¥I¥X¡C
ªð¦^¦Cªí ¤W¤@¥DÃD