Public Sub ShowViews() ActiveSheet.Unprotect Application.Dialogs(xlDialogCustomViews).Show ActiveSheet.Protect End Sub
Public Sub ShowViews() ActiveSheet.Unprotect Application.Dialogs(xlDialogCustomViews).Show ActiveSheet.Protect End Sub
____________________________________________
Nihil simul inventum est et perfectum
Abusus non tollit usum
Last night I dreamed of a small consolation enjoyed only by the blind: Nobody knows the trouble I've not seen!
James Thurber
Reply With Quote
