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

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

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

¥»©«³Ì«á¥Ñ freeffly ©ó 2012-2-22 17:04 ½s¿è

¦pªG§ÚªºÀɮ׸̭±¦³¨Ç¤u§@ªí¸Ì­±¡A¦³±Mªùµ¹¸Ó¤u§@ªí¨Ï¥Îªº©w¸q¦WºÙ
¦³¤°»ò¤è¦¡¥i¥H¤@¦¸§R°£³o¨Ç±Mªù«ü©w¤u§@ªíªº©w¸q¦WºÙ¶Ü?
¦r¨å¨â¦U¦r ÁÙ¯uÃø²z¸Ñ

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

TOP

¦^´_ 2# chin15


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

TOP

¥»©«³Ì«á¥Ñ 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

¦^´_ 4# GBKEE


  ¤j¤jªGµM²´¦y   §Ú¤]¦³µo²{ ©Ò¥H§Ú§ï¦¨§Ú­nªº¤è¦¡
  §Úªº¤èªk¦p¤U

    Sub §R°£¦WºÙ()
    For i = 4 To Sheets.Count
    Sheets(i).Visible = True
    Sheets(i).Select
    For Each c In ActiveSheet.Names
     c.Delete
   Next
    Sheets(i).Visible = False
    Next
End Sub
¦r¨å¨â¦U¦r ÁÙ¯uÃø²z¸Ñ

TOP

¦^´_ 5# freeffly
²¤Æ¤@¤U
  1. Sub §R°£¦WºÙ()
  2.     For I = 4 To Sheets.Count
  3.         For Each c In Sheets(I).Names
  4.             c.Delete
  5.         Next
  6.     Next
  7. End Sub
½Æ»s¥N½X

TOP

¦^´_ 6# GBKEE


    ·PÁ¤j¤jÀ°¦£Â²¤Æ
     §Ú¥H¬°«ü©w¤u§@ªí­nÅý¥LÅã¥Ü¤~¯à§@·~
      ¨S·Q¨ìÁÙ¥i¥H³o¼Ë°µ
¦r¨å¨â¦U¦r ÁÙ¯uÃø²z¸Ñ

TOP

¦b¨C­Ó¤u§@ªí¤W´`Àô¡A§R°£¨C­Óªíªº©w¸q¦WºÙ
¸ò¤@¦¸§R°£¬¡­¶Ã¯¤º¤w©w¸qªº¦WºÙ
®t§O¦b­þ¸Ì¡H

TOP

¦^´_ 8# chin15
³o´N­n½Ð±Ð¼Ó¥Dªº»Ý¨D¬O¤°»ò

TOP

¦^´_ 8# chin15


    §Ú¥D­n¬O­n§R°£¬Y¨Ç¤u§@ªíªº©w¸q¦WºÙ
    ¥i¯à¬O²Ä4¦U¤u§@ªí¥H«áªº
     ¦]¬°«e­±´X¦U¤u§@ªíªº¦WºÙÁÙ­n«O¯d
     ¦U¦ì³£´£¨Ñ¤F§Ú¾Ç²ßªº¦a¤è
      ÁÂÁ³á
¦r¨å¨â¦U¦r ÁÙ¯uÃø²z¸Ñ

TOP

        ÀR«ä¦Û¦b : ­×¦æ­nô½t­×¤ß¡AÂǨƽm¤ß¡AÀH³B¾i¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD