SheetDelete_ANmar

Deletes a sheet from a workbook, checks it is already there first


Public

Tested

My Own Work
Sub SheetDelete_ANmar(SheetName, Optional WkNa = "This")
If WkNa = "This" Then WkNa = ThisWorkbook.Name
If FindSheet(SheetName, WkNa) Then
Application.DisplayAlerts=False
Workbooks(WkNa).Worksheets(SheetName).Delete
Application.DisplayAlerts=True
End If
End Sub

SheetName, Optional WkNa

Views 3996 Downloads 1330

VBA-Excel Components
ANmarAmdeen
813
Revisions

v2.0

Needs