View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
abxy[_50_] abxy[_50_] is offline
external usenet poster
 
Posts: 1
Default protecting the workbook through a macro

Ok, starting tommorow, another department has to see my workbook. Now,
would just share the workbook through the network, but since pages ar
added to the workbook as it's updated, i can't have that feature
Instead, i'll just do a savecopyas within my macro that i use to updat
the workbook. The thing is, i don't want them to be able to alter an
data in any cell of the workbook(they don't know vba, so i'm no
worried about them trying to alter code), further more, i don't wan
them to be able to save the workbook (which i already have the code fo
below), so is there someway to say in vba "if the workbook isn't i
drive I:\ (no matter where it is in drive I:\, as long as it's there
then make it so that every cell in this workbook is protecte
(password=no2cs), and the workbook is unsavable" ...that code wouldn'
go in the macro code, would it?

code for making the workbook unsavable as someone has given me:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Cancel = True
End Sub

thanks in advance for your help :

--
Message posted from http://www.ExcelForum.com