Thread: protect with password
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Losse[_10_] Losse[_10_] is offline
external usenet poster
  
Posts: 1
Default protect with password

Sub ProtectSheet()
Dim Password
Password = "nowfal"
ActiveSheet.Protect Password, True, True, True
End Sub
Sub UnProtectSheet()
Password = "nowfal"
ActiveSheet.Unprotect Password
End Sub


--
Losse
------------------------------------------------------------------------
Losse's Profile: http://www.excelforum.com/member.php...o&userid=24813
View this thread: http://www.excelforum.com/showthread...hreadid=386565

Reply With QuoteReply With Quote