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

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

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

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

TOP

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

TOP

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

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 : Ä@­n¤j¡B§Ó­n°í¡B®ð­n¬X¡B¤ß­n²Ó¡C
ªð¦^¦Cªí ¤W¤@¥DÃD