Need help with "Error in Activate/Deactivate Procedure"

[theanchorman]

Hello,

This is the first time where I got an error that I cannot find anything online about. I don't know when this issue occurs but sometimes randomly I get messages "Error in Activate Procedure" or "Error in Deactivate Procedure". Can anyone help me on this?

 

[cerfani]

i googled "Error in Activate Procedure excel" and there is nothing. I don't think that is an excel error message. Excel won't have random errors unless your install is corrupted or something and in that case you just reinstall. I have no idea what your error is since there is no documentation about it online. You may want to double check what the error message says and if it is indeed excel displaying the message and not some random process running on your pc.

 

[theanchorman]

It usually happens when I am switching between excel files, and it does say Microsoft Excel on the top when the message comes up. Wish I knew how to attach an image from my desktop. I wonder if it could be macro related, but I'm not running anything?

 

[cerfani]

Just press Print screen, then it will copy your screen to the clipboard, then paste it in the ms paint program. Then upload that image to Imgur or any image hosting site. Then use the insert image button when replying here and give the imgur link.

if you do it right, it will look like this...

imgur links look like this... https://i.imgur.com/ShAz2X7.png (i cropped the image in ms paint)

 

[cerfani]

I just had a thought... do you have a macro enabled workbook open, with code inserted into the activate and deactivate events?

it sounds like excel is having a problem calling workbook events... not sure why... it sounds like something is corrupted.

 

[theanchorman]

I must be doing something wrong but the image doesnt show up. Here is the address - https://imgur.com/a/rl12I

 

[theanchorman]

I just had a thought... do you have a macro enabled workbook open, with code inserted into the activate and deactivate events?

it sounds like excel is having a problem calling workbook events... not sure why... it sounds like something is corrupted.

I dont think so, and this doesnt happen everytime when I open the file. I'll have to run through all the macros.

 

[cerfani]

Yeah double check every sheet object and workbook object in the vba editor for every project listed and make sure no event code is being used. So you need to open the files that are causing the problems and these files will be listed as projects in the vba editor.

So Excel is programmed to call an activate and deactivate event when the workbook is focused/unfocused (i might be wrong, google "excel workbook activate" event) and it sounds like the error has to do with these events being called. The only way there can be a problem is if you wrote some code to be called in these events and this code is conflicting with each other.

 

[theanchorman]

Okay so I found the code in the VBA editor that was causing this issue, but I dont understand what the code is trying to say?

Public bClose As Boolean


Private Sub Workbook_Activate()
On Error GoTo proc_error
Application.CommandBars("View/Print").Visible = True
proc_end:
Exit Sub
proc_error:
MsgBox "Error in Activate Procedure"
Resume proc_end
End Sub


Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error GoTo proc_error
bClose = True
proc_end:
Exit Sub
proc_error:
MsgBox "Error in BeforeClose Procedure"
Resume proc_end
End Sub


Private Sub Workbook_Deactivate()
On Error GoTo proc_error
Application.CommandBars("View/Print").Visible = False
'This deletes from the collection but not permanently
If bClose = True Then Application.CommandBars("View/Print").Delete
proc_end:
Exit Sub
proc_error:
MsgBox "Error in Deactivate Procedure"
Resume proc_end
End Sub


Private Sub Workbook_Open()
On Error GoTo proc_error
Application.CommandBars("View/Print").Position = msoBarTop
proc_end:
Exit Sub
proc_error:
MsgBox "Error in Open Procedure"
Resume proc_end
End Sub

 

[Norie]

As far as I can see it's trying to show/hide a command bar named 'View/Print' which I'm not sure is a standard command bar so might be something that somebody has created specially for this workbook.

If you delete all the posted code does the workbook open without error?

If it does is there any functionality missing?