VBA Snippets

blank

source code

Message_WorsheetIsProtectedUprotectFirst

Public Sub Message_WorsheetIsProtectedUprotectFirst()

Dim sMessage As String
   sMessage = "You must unprotect the worksheet first."

   Call MsgBox(sMessage, vbOKOnly + vbInformation, "Worksheet Protected")
   Call Tracer_Add("MESSAGE", sMessage)
End Sub