Making user do something before exiting Excel

[ammdumas]

I want to make sure a user has hidden columns before they exit Excel. How can I get a macros to check that it's been done when they try to close down excel in any way?

 

[phantom1975]

Wouldn't it be easier to just hide the columns when Excel closes?

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Sheets("Sheet1").Columns("A:D").Hidden = True
End Sub

 

[ammdumas]

That would work too. I'll shall give it a try...

 

[ammdumas]

Didn't work. Just closes without doing anything. Hiding the coplumns is also password protected. I don't know if that would have anything to do with it....

 

[phantom1975]

The code needs to go into the ThisWorkbook module. Try this instead:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    With Sheets("Sheet1")
        .Unprotect Password:="Hello"
        .Columns("A:D").Hidden = True
        .Protect Password:="Hello"
    End With
End Sub

 

[ammdumas]

How do I out code into that module? Where do I find it?

 

[phantom1975]

How do I out code into that module? Where do I find it?

From Excel, push ALT + F11 to open the Visual Basic Editor.

On the left side, you should see ThisWorkbook. Double-click this and then insert the code into the window on the right.

 

[ammdumas]

You rock! It works. You know, That's a pretty good thing for everybody to know...should post it somewhere...