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

[µo°Ý] (µo°Ý)¡¹³s§Rn­Ó¤u§@ªí½d¨Ò°ÝÃD

¥»©«³Ì«á¥Ñ GBKEE ©ó 2012-1-5 11:15 ½s¿è

¦^´_ 4# lcc_seven
§R°£¨ì¥u³Ñ1­Ó¡A¦]¬°¦pªG³s³Ì«á¤@­Ó¤]§R°£¡AÀÉ®×·|Ãö³¬°_¨Ó
½Ð°Ý ¤@¤U  2007¥H¤Wª©¥»¤¹³\¬¡­¶Ã¯¤¤§¹¥þ¨S¦³ Sheet (¤u§@ªí) ¶Ü?
****************
«áÄò :
If SheetsCount > 1 Then            
    For i = 1 To SheetsCount - 1
        Sheets(1).Delete      <- §R°£²Ä¤@­Ó ¦ý¦p¬O Sheets(i).Delete ·|¦³¿ù»~  ¥i°Ñ¦Ò3#ªº Step-1
    Next i
End If
******************************

TOP

        ÀR«ä¦Û¦b : ¤f»¡¤@¥y¦n¸Ü¡A¦p¤f¥X½¬ªá¡F¤f»¡¤@¥yÃa¸Ü¦p¤f¦R¬r³D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD