Sub deletesheets()
    Application.DisplayAlerts = False
    Worksheets("Sheet3").delete
    Application.DisplayAlerts = Ture
End Sub


Sub deletesheets2()
    Application.DisplayAlerts = False
    Sheets(Sheets.Count).delete
    Application.DisplayAlerts = True
End Sub

 

'Tools > Excel VBA' 카테고리의 다른 글

delete sheets  (0) 2015.11.27
add sheet  (0) 2015.11.27
copy cell  (0) 2015.11.27
by TrafficYoon 2015.11.27 16:51
| 1 2 3 |