Smitty
Legend
- Joined
- May 15, 2003
- Messages
- 29,536
I have a workbook with some user forms that I'd like to share. I use a workbook_open string to disable most of Excel's functionality, so users can't screw anything up (our reps just got PC's last month), but when I share the woorkbook and then try to open it, the workbook_open string bombs out. Although the user forms can still be launched.
Sub Protect_All()
Application.ScreenUpdating = False
Application.Caption = "Customer Master Maintenance"
Application.MacroOptions Macro:="Protect_All", Description:="", _
ShortcutKey:="e"
Application.DisplayStatusBar = False
Application.DisplayFormulaBar = False
Application.MoveAfterReturn = False
Application.Goto Reference:="Data_Form"
Range("A1").Select
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayGridlines = False
.DisplayZeros = False
End With
ActiveSheet.Protect UserInterfaceOnly:=True
How can I disable Excel like this and still share the workbook?
Thanks,
Smitty
Sub Protect_All()
Application.ScreenUpdating = False
Application.Caption = "Customer Master Maintenance"
Application.MacroOptions Macro:="Protect_All", Description:="", _
ShortcutKey:="e"
Application.DisplayStatusBar = False
Application.DisplayFormulaBar = False
Application.MoveAfterReturn = False
Application.Goto Reference:="Data_Form"
Range("A1").Select
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayGridlines = False
.DisplayZeros = False
End With
ActiveSheet.Protect UserInterfaceOnly:=True
How can I disable Excel like this and still share the workbook?
Thanks,
Smitty