Deleting Sheets

Public Function BET_WshDelete(sWshName As String) 
   Application.DisplayAlerts = bDisplayAlerts
   Sheets(sWshName).Delete
   Application.DisplayAlerts = True
End Sub

The last line is not actually needed as the DisplayAlerts is automatically reset, although it makes your code more readable



© 2019 Better Solutions Limited. All Rights Reserved. © 2019 Better Solutions Limited TopPrevNext