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

[µo°Ý] (¤w¸Ñ¨M)§R°£¤u§@ªí¸Ì­±©Ò¦³ªº©w¸q¦WºÙ

¥»©«³Ì«á¥Ñ GBKEE ©ó 2011-4-26 16:22 ½s¿è

¦^´_ 3# freeffly
1¼Ó´£°Ý :¦³±Mªùµ¹¸Ó¤u§@ªí¨Ï¥Îªº©w¸q¦WºÙ,¦³¤°»ò¤è¦¡¥i¥H¤@¦¸§R°£³o¨Ç±Mªù«ü©w¤u§@ªíªº©w¸q¦WºÙ¶Ü?
2¼Óªºµ{¦¡·|§R±¼¬¡­¶Ã¯¤¤©Ò¦³ªº©w¸q¦WºÙ
´£¨Ñ¥u§R¸Ó¤u§@ªíªº©w¸q¦WºÙ
  1. Sub Macro1() '©w¸q¦WºÙ¬°¸Ó¤u§@ªí±M¥Îªº¦WºÙ
  2.     Sheet1.Names.Add Name:="ABC", RefersToR1C1:="=R5C2:R13C2"
  3. End Sub

  4. Sub Ex()
  5. For Each E In Sheet1.Names '§R°£Sheet1¸Ó¤u§@ªíªº¦WºÙ
  6. E.Delete
  7. Next
  8. End Sub
½Æ»s¥N½X

TOP

¦^´_ 2# chin15


    ·PÁÂ
     µ{¦¡½X¤ñ·Q¹³¤¤ªºÂ²³æ
     ­ì¥»¦Û¤v¸Õ¤F«Ü¦h¤èªk
     ´N¸ò¥¿½T¤èªk®t¤@¨Ç
¦r¨å¨â¦U¦r ÁÙ¯uÃø²z¸Ñ

TOP

Sub dm()
For Each c In ActiveWorkbook.Names
   c.Delete
Next
End Sub

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD