Posts by Eugene

Dave,

Most of what I've learned, I've learned from you and your web site....Thanks....

Where can I find a list of the control ID numbers? I use the name of the control right now, but that can become cumbersome.

Thanks for all you do for us...
Eugene

Hesham,

Try these two macros:

Private Sub Workbook_Open()
Application.CommandBars("Insert").Controls("Paste Function").Enabled = False
Application.DisplayFormulaBar = False
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Insert").Controls("Paste Function").Enabled = True
Application.DisplayFormulaBar = True
End Sub

The only problem would be if they disable their macros, or have their security setting set "High", but there's a way around that as well.

Have a nice day...
Eugene

Will,

I'm learning a great deal from you guys. What's the difference between Auto_Close and Workbook_BeforeClose? Everytime I use either or, I end up with the same results.

Thanks,
Eugene

Bobaymon,

Try this Auto_Close macro:

Sub Auto_Close ()

ActiveWorkbook.Saved = True

End Sub

(This closes the workbook without saving changes)

Vr,
Eugene

Philbee,

I'm assuming that you want to change the folder name each time you run the macro. This one should do it for you...

Sub Macro1()
Dim Name1
Name1 = InputBox("Please Enter the Name of the Folder", "Name Please...")
Workbooks.Open Filename:="c:\data\admin\" & Name1 & "\2004-5\sheet1.xls"

End Sub

Vr,
Eugene