Can you show the documentation please?
Sub Macro1()
Here is the docuemntation for one we created, we are working on another right now and do not want the password in the documentation.
' Macro1 Macro
' Macro recorded 2/4/2009 by Robert Ragusin
'
'
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Next.Select
ActiveSheet.Unprotect Password:="checks"
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
End Sub
Sub Macro2()
'
' Macro2 Macro
' Macro recorded 2/4/2009 by Robert Ragusin
'
'
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Next.Select
ActiveSheet.Protect "checks"
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
ActiveSheet.Previous.Select
End Sub