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

[µo°Ý] Ãö©ó¤u§@ªí²¾°Ê¨ì·s¬¡­¶Ã¯

[µo°Ý] Ãö©ó¤u§@ªí²¾°Ê¨ì·s¬¡­¶Ã¯

¥H¤U¥N½X¬O±N¬¡­¶Ã¯¸Ì©Ò¦³ sh¶}ÀYªº¤u§@ªí§R°£
For I = Worksheets.Count To 1 Step -1
If Worksheets(I).Name Like "Sh*" Then
Worksheets(I).Delete
End If
Next

§ï¦¨¤U¦C¤è¦¡¥i¥H±N sh¶}ÀYªº¤u§@ªí²¾°Ê¨ì·s¬¡­¶Ã¯¸Ì
¤u§@ªí¥i¥H¥¿½T²¾°Ê¦ý¥N½X«o·|¥X²{¿ù»~
¤£ª¾¹D°ÝÃD¥X¦b¨º¸Ì
For I = Worksheets.Count To 1 Step -1
If Worksheets(I).Name Like "Sh*" Then
Worksheets(I).MOVE
End If
Next

¦^´_ 1# feecshyrnd
­Y­n²¾°Ê¦h­Ó¤u§@ªí¡A¥H§A©Ò¥Îªº°j°é¤è¦¡³B²z·|³y¦¨¿ù»~¡A¦]¬°¨C°j°é¤@¦¸«á²¾¥Xªº¤u§@ªí·|¦Û¦¨¤@­ÓExcelÀÉ¡A¥B¸ÓÀÉ·|Åܦ¨§@¥Î¤¤¡A°£«D¦A«ì´_­ì©lÀɦ¨§@¥Î¤¤¡C

¦]¦¹­Y­n±N¦h¼Æ²Å¦X±ø¥óªº¤u§@ªí²¾¨ì¤@­ÓÀɮפ¤(«D¤@­Ó¤u§@ªí¤@­ÓÀÉ®×)®É¡A«Øij±N­n²¾¥Xªº¤u§@ªí¥ý¦æ¥´¥]¡A¦A¥H¤@¦¸©ÊªºMOVE¤~¥i§¹¦¨§A©Ò­n¨Dªºµ²ªG¡C

TOP

        ÀR«ä¦Û¦b : ¤Hªº²´·úªø¦b«e­±¡A¥u¬Ý¨ì§O¤Hªº¯ÊÂI¡Aµ·²@¬Ý¤£¨ì¦Û¤vªº¯ÊÂI¡C
ªð¦^¦Cªí ¤W¤@¥DÃD