ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Workbook_Open Event not firing (https://www.excelbanter.com/excel-programming/375592-workbook_open-event-not-firing.html)

MDW

Workbook_Open Event not firing
 
I'm trying to write code that will disable the "Sort" menu option when I open
a specific workbook, and enable it again when the workbook is closed. The
actual code that does that is written, but when I place references to it in
the Workbook_Open sub, it is not called.

Just to test, here is the code I put in:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Call disable_sort(True)
MsgBox "Workbook_BeforeClose"

End Sub

Private Sub Workbook_Open()

MsgBox "Workbook_Open"

End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

'Call disable_sort(False)

MsgBox "Workbook_SheetActivate"

End Sub

When I open the file, nothing at all happens. When I move to a different
sheet, the message box for SheetActivate pops up. When I close the file, the
"Workbook_Close" message box appears.

So what's the deal with Workbook_Open? </Seinfeld
--
Hmm...they have the Internet on COMPUTERS now!

Alok

Workbook_Open Event not firing
 
Hi,
I do not see any call to disable_sort in Workbook_Open? If the call to
disable_sort with the True parameter is supposed to turn off the Sort option
then your Workbook_Open event should include that

Private Sub Workbook_Open()

Disable_Sort True
MsgBox "Workbook_Open"

End Sub


"MDW" wrote:

I'm trying to write code that will disable the "Sort" menu option when I open
a specific workbook, and enable it again when the workbook is closed. The
actual code that does that is written, but when I place references to it in
the Workbook_Open sub, it is not called.

Just to test, here is the code I put in:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Call disable_sort(True)
MsgBox "Workbook_BeforeClose"

End Sub

Private Sub Workbook_Open()

MsgBox "Workbook_Open"

End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

'Call disable_sort(False)

MsgBox "Workbook_SheetActivate"

End Sub

When I open the file, nothing at all happens. When I move to a different
sheet, the message box for SheetActivate pops up. When I close the file, the
"Workbook_Close" message box appears.

So what's the deal with Workbook_Open? </Seinfeld
--
Hmm...they have the Internet on COMPUTERS now!


MDW

Workbook_Open Event not firing
 
I already tried that. It doesn't work.

Like I said, I can't even get the messagebox to appear. The event itself
isn't firing.

--
Hmm...they have the Internet on COMPUTERS now!


"Alok" wrote:

Hi,
I do not see any call to disable_sort in Workbook_Open? If the call to
disable_sort with the True parameter is supposed to turn off the Sort option
then your Workbook_Open event should include that

Private Sub Workbook_Open()

Disable_Sort True
MsgBox "Workbook_Open"

End Sub


"MDW" wrote:

I'm trying to write code that will disable the "Sort" menu option when I open
a specific workbook, and enable it again when the workbook is closed. The
actual code that does that is written, but when I place references to it in
the Workbook_Open sub, it is not called.

Just to test, here is the code I put in:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Call disable_sort(True)
MsgBox "Workbook_BeforeClose"

End Sub

Private Sub Workbook_Open()

MsgBox "Workbook_Open"

End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

'Call disable_sort(False)

MsgBox "Workbook_SheetActivate"

End Sub

When I open the file, nothing at all happens. When I move to a different
sheet, the message box for SheetActivate pops up. When I close the file, the
"Workbook_Close" message box appears.

So what's the deal with Workbook_Open? </Seinfeld
--
Hmm...they have the Internet on COMPUTERS now!


Alok

Workbook_Open Event not firing
 
Sometimes the code turns off the events by executing this line

Application.EnableEvents = False

This may have happened in your case. Either this excel workbook or another
one loaded in the same Excel instance may have done it.

I suggest you close your workbook and then open it again in a new instance
of excel. That is Start Excel and then do File/Open.



"MDW" wrote:

I already tried that. It doesn't work.

Like I said, I can't even get the messagebox to appear. The event itself
isn't firing.

--
Hmm...they have the Internet on COMPUTERS now!


"Alok" wrote:

Hi,
I do not see any call to disable_sort in Workbook_Open? If the call to
disable_sort with the True parameter is supposed to turn off the Sort option
then your Workbook_Open event should include that

Private Sub Workbook_Open()

Disable_Sort True
MsgBox "Workbook_Open"

End Sub


"MDW" wrote:

I'm trying to write code that will disable the "Sort" menu option when I open
a specific workbook, and enable it again when the workbook is closed. The
actual code that does that is written, but when I place references to it in
the Workbook_Open sub, it is not called.

Just to test, here is the code I put in:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Call disable_sort(True)
MsgBox "Workbook_BeforeClose"

End Sub

Private Sub Workbook_Open()

MsgBox "Workbook_Open"

End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

'Call disable_sort(False)

MsgBox "Workbook_SheetActivate"

End Sub

When I open the file, nothing at all happens. When I move to a different
sheet, the message box for SheetActivate pops up. When I close the file, the
"Workbook_Close" message box appears.

So what's the deal with Workbook_Open? </Seinfeld
--
Hmm...they have the Internet on COMPUTERS now!



All times are GMT +1. The time now is 02:04 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com