Coding deletion
How can you lock them out permanently.
You can't. Excel security isn't robust enough to do what you want. You can
make things more difficult by; for example, making every sheet except a blank
one XlVeryHidden but this will only deter the inexperienced.
Mike
"Hamed parhizkar" wrote:
Currently I have a vba code that will eliminate the page after it has been
opened a number of times. For instacne if the code is set to 3, after the 3rd
time the sheet is opened it will lock the user out permanently. However, if
they should to select disable macros, they can access the sheet. How can you
lock them out permanently. below is the code I am using.
Private Sub Workbook_Open()
Dim OpenCount As Integer
OpenCount = GetSetting("MyApp", "Count", "OpenCount", 0)
SaveSetting "MyApp", "Count", "OpenCount", OpenCount + 1
If OpenCount = 3 Then ThisWorkbook.Close SaveChanges:=False
End Sub
|