Macro to Lock File if Terms are not Accepted

I'm working on an excel document and I'd like to have a button macro on the first tab when opening to basically work like a "terms of service" agreement where if you press button a - agree it unlocks the other tabs and you can use the document but if you press button b - disagree the document stays locked.

I was wondering if someone can help me with this pls?

Thanks!

Hi,

Something like this what you're after?

Hope this helps

Yes it looks like it! The buttons are not working for me though but I can see that you've hidden Sheet 1 and 2.

So if I were to copy the VBA from this, what would I have to change in the VBA script to hide all 8 of my tabs?

Thanks for your help!

Perhaps the buttons aren't working because macros might be disabled???

I tried to engineer it so that you wouldn't have to change anything except the 2 instances of "Sheet1" just change to the name of your worksheet with the 2 buttons on it. That should work without a hitch.

Let me know

would it matter if im using a mac version of excel? ya i made sure i enabled the macros. Thanks for all your help

So i would just replace "sheet1" w my first tab title, right?

Private Sub Workbook_Open()
Dim WS As Worksheet
For Each WS In Me.Worksheets
If WS.Name <> "Sheet1" Then
WS.Visible = xlSheetVeryHidden
End If
Next WS
End Sub

It might, but I couldn't answer that question honestly as I've never used Excel for Mac sorry.

Yeah that should do the trick

There's also another section you should change in the "Sheet1" module