Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Hide the close X in excel
Hi,
I have a code, (below), to hide toolbars and to prevent users from tampering. I have a macro which performs some operations and then saves and closes the file. I have just realised that the X to close excel on the top right corner is still visible meaning the file can be closed without using the macro. Is it possible to also hide this feature so users must close using the macro? Thanks Private mFormulaBar Private Sub Workbook_BeforeClose() Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = True Next oCB Application.DisplayFormulaBar = mFormulaBar End Sub Private Sub Workbook_Open() Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = False Next oCB mFormulaBar = Application.DisplayFormulaBar Application.DisplayFormulaBar = False End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Hide the close X in excel
Hi
Too much alteration of the excel interface will annoy your users more than it is worth. If your users have more than one excel file open, for example, any code will probably stop them closing those files as well as yours, even if they are not saving your file. Try putting your macro code that runs when excel closes into your before_close macro, so that it runs automatically. regards Paul On Apr 22, 3:04*pm, LiAD wrote: Hi, I have a code, (below), to hide toolbars and to prevent users from tampering. *I have a macro which performs some operations and then saves and closes the file. *I have just realised that the X to close excel on the top right corner is still visible meaning the file can be closed without using the macro. *Is it possible to also hide this feature so users must close using the macro? Thanks Private mFormulaBar Private Sub Workbook_BeforeClose() Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = True Next oCB Application.DisplayFormulaBar = mFormulaBar End Sub Private Sub Workbook_Open() Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = False Next oCB mFormulaBar = Application.DisplayFormulaBar Application.DisplayFormulaBar = False End Sub |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Hide the close X in excel
How come your Workbook_BeforeClose event header does not have a "Cancel"
argument? Is the one you posted your own creation or was it provided by the VB interface? If VB provided it, what version of Excel are you using? On my XL2003 system, the BeforeClose event comes with the Cancel argument allowing you to stop the user requested shut down of the workbook. -- Rick (MVP - Excel) "LiAD" wrote in message ... Hi, I have a code, (below), to hide toolbars and to prevent users from tampering. I have a macro which performs some operations and then saves and closes the file. I have just realised that the X to close excel on the top right corner is still visible meaning the file can be closed without using the macro. Is it possible to also hide this feature so users must close using the macro? Thanks Private mFormulaBar Private Sub Workbook_BeforeClose() Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = True Next oCB Application.DisplayFormulaBar = mFormulaBar End Sub Private Sub Workbook_Open() Dim oCB As CommandBar For Each oCB In Application.CommandBars oCB.Enabled = False Next oCB mFormulaBar = Application.DisplayFormulaBar Application.DisplayFormulaBar = False End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Before Close Event Hide all Worksheets then Close Application | Excel Programming | |||
Hide Close Button Excel 2007 | Excel Discussion (Misc queries) | |||
how to close a form in vba (not hide) | Excel Programming | |||
close (hide) toolbars | Excel Discussion (Misc queries) | |||
Hide all Excel tool/command bars except mine and reload on close | Excel Programming |