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

©w¸q¦WºÙ Print_Area µLªk¥ÎMarco§R°£

©w¸q¦WºÙ Print_Area µLªk¥ÎMarco§R°£

¤p§Ì¦³¤@Àɮ׬O±qExcel 97 ¤@ª½¨Ï¥Î¨ìExcel 2003.
³oÀɮפº§t¦³¦h­Ó¦³®Ä¤ÎµL®Äªº©w¸q¦WºÙ (Name)
¥Ø«e§@·~¨t²Î¤Î¤å®Ñ³B²z¨t²Î¬OWindow 7¤ÎExcel 2007
¤µ¤é§Ú¥HExcel 2007«Ø¥ß¤@­ÓMarco­n±Nª©¥»ªºExcelÀɤºªº©Ò¦³©w¸q¦WºÙ³£§R°£. »yªk¦p¤U:

Sub Clearnames()
Dim nas As Name
For Each nas In ActiveWorkBook.Names
nas.Delete
Next
End Sub

µ²ªG,¤p§Ìµo²{,¦³¤@­ÓÄÝ©óWorkbookªº©w¸q¦WºÙ,¦W¬°Print_Area, ÁÙ¯d¦bÀɮ׸Ì,¦Ó¥B¥u¯à¤â°Ê§R°£.
³o¬O«ç»ò¦^¨Æ? §Úªº»yªkÀ³¸Ó¨S¿ù§a.
¬Oª©¥»°ÝÃD¶Ü?ÁÙ¬O­n¥Î¨ä¥¦¤è¦¡§R°£.
§Ú¬d¸ß¹L³\¦h¸ê®Æ, ©Ò¨Ï¥Îªº»yªk³£»P§Ú©Ò¦Cªº¬Û¦P©Î¬Û¦ü. ¦Ó§Ú®M¥Î§O¤Hªº»yªk«á,°ÝÃD¤´¦b.
Àµ½Ð¤j®aÀ°¦£³B²z. ÁÂÁÂ.
(Àɮצ³¤W¤d­Ó,§Ú¥i¨S®É¶¡¤@­Ó¤@­Ó¶}Àɮפâ°Ê§R°£)

Sub Clearnames()
On Error Resume Next
For Each sh In ActiveWorkbook.Sheets
sh.PageSetup.PrintArea = ""
Next
End Sub

²M°£¦C¦L½d³ò

TOP

§Ú§R¤F¦n´X¦~¬O¥i¥H
¥Î³oºØ¸Õ¸Õ¬Ý
ActiveWorkbook.Names(sht).Delete

TOP

¦^´_ 2# oobird

¸Õ¹Lª©¤jªº»yªk.
µ²ªG.©w¸q¦WºÙ Print_Area ¤´µM¦s¦b.
¦Ó¥B¨ä Refers To ªº­È¤]¨S³Q§ïÅÜ. ³o¥i¥H»¡¬O¥¦®Ú¥»¨S³Q°µ¥ô¦ó­×§ï©Î²M°£.

³Ì«á§Ú¥u¯à¥Î Name Manager (Excel 2007ªº¥\¯à¤§¤@)¨Ó¤â°Ê§R°£.

«Ü©_©Çªº±¡ªp,¤£¬O¶Ü?

§Ú¤]¸ÕµÛ¨Ï¥Î¿ý»s¥¨¶°ªº¤è¦¡¨Ó§R°£¥¦. ¤]¬O¨S¥Î.

TOP

­Y¸Ó¦WºÙ¤w¸gµo¥Í¿ù»~¡A´N­n¤â°Ê§R°£¤F¡I

TOP

¥»©«³Ì«á¥Ñ MRSA ©ó 2010-11-24 00:36 ½s¿è

¦^´_ 5# oobird


¨C­Ó©w¸q¦WºÙ·|¹ïÀ³¨ì¥|­Ó­È, 1¬O°Ñ¦ì¦ì§}(Refers To), 2¬O­È(Value), 3¬O©w¸q¦WºÙªºScope (Scope), 4¬Oµù¸Ñ(Comment)
ª©¤j©Ò¿×ªº©w¸q¦WºÙ¿ù»~ªº·N«ä¬O«ü¥H¤W¥|­Ó­Èªº­þ¤@­Ó.
§Ú©Ò§x´bªº¬O,§Ú¦bÀɮפº¦³³\¦h©w¸q¦WºÙ, «Ü¦h³£¬O Value ©Î Refers To  ¦³¿ù»~ªº(#REF! ©Î¿ù»~ªº¥~³¡³sµ²), ¦ý¬O,³\¦h©w¸q¦WºÙ¬°Print_Area³£¯à³Q§R°£,°¾°¾´N¿W¿W³o­Ó Print_Area (Value¬O#REF!, Refers To¬O=#REF!, Scope¬OWorkbook, Comment¬OªÅ¥Õ)ªº©w¸q¦WºÙ§R°£¤£¤F.
¬OExcel 2010 (§Ú¤]¦bExcel 2007¸Õ¹L,¤]¦³¦P¼Ë°ÝÃD) ¥»¨­ªº°ÝÃD¶Ü?

TOP

¬Ý¨ì#REF!, ´N¬Oµo¥Í¿ù»~¤F¡C
ªí¥Ü³o­Ó¦WºÙ¤w¤£¦¨¥ß¡A¦ÛµM·j´M¤£¨ì¦Ó­n¤â¤u§R°£¡I

TOP

¥»©«³Ì«á¥Ñ HUNGCHILIN ©ó 2010-11-24 23:21 ½s¿è

¦^´_ 7# oobird

§Ú´ú¤F¤@¤UÃa±¼³sµ²ªº©w¸q ¥i¥H¥ÎVBA§R
¥i¯à¬O¨º­ÓÀɤñ¸û©_©Ç¡A¨S¬Ý¨ìÀɤ£ª¾¹D
¥Ø«e´ú³£OK

¨B1.Ãa±¼ªº©w¸q
2010-11-24 23-14-23.jpg
2010-11-24 23:20

¨B2.VBA¤u¨ã§R©w¸q
2010-11-24 23-14-52.jpg
2010-11-24 23:20

¨B3.¤w§R°£
2010-11-24 23-15-31.jpg
2010-11-24 23:20

TOP

·Q°_¥H«e´¿°µ¹L³o¼Ëªº´ú¸Õ¡A¦b¦Û¤v¹q¸£«Ø¥ßªº¦WºÙ¡A¿ò¥¢°Ñ·Óªº¿ù»~«á¡A¦bvba¥i¥H¥þ³¡§R°£¡C
¬Û¦Pªº±¡§Î­Y¬O±µ¦¬§O¤Hªº¡Avba´N¤£§â¨º¨Ç¿ù»~ªº¦WºÙ·í°µ¦WºÙ¦Ó³ø¿ù¡C¨t²Î½w¦s·|°O¿ý¤å¥ó©Òªº¦³¾Þ§@¡A³o´N¬O¦Ñªº¤å¥óÅã±oÁs¸~ªº­ì¦]¡A·Ó²z¦s¦b½w¦s¤¤ªºªF¦èÀ³¸Ó¸òµÛÀɮ׶]ªº¡A§Ú©l²×¤£¯à©ú¥Õ¨ä¤¤¹D²z¡I

TOP

        ÀR«ä¦Û¦b : ¯à¥I¥X·R¤ß´N¬OºÖ¡A¯à®ø°£·Ð´o´N¬O¼z¡C
ªð¦^¦Cªí ¤W¤@¥DÃD