Menu commands - overruling with macro - How to do it?

  • Thread starter Thread starter Jan Kronsell
  • Start date Start date
J

Jan Kronsell

If I make a procedure like this in word:

Sub FilePrint()
MsgBox "hello"
End Sub

it will overule the normal File - Print menu command and the same goes for
alle the menu commands.

How do I accomplish the same in Excel. I tried with the above code in a
module, ThisWorkbook module and in a Sheet module.

am I doing someting wrong, or does it simply not work in Excel.

Jan
 
Jan,

In the codemodule of the ThisWorkbook object:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
FilePrint
End Sub

Put your FilePrint code into a standard module in the same workbook.

HTH,
Bernie
MS Excel MVP
 
I know how to use events, that will only work if a suiting wevent exist. The
FilePrint was just an example. It migh as well have been FormatColumn or
InsertRow or any other built in commands.

I also know I can edit the menu item so it plays a macro, whwen selected,
but that will not prevent user from accessing the original function by using
a shortcut.

What I really need is to make my own function for fx saving a file, and make
that the only way to save a file (in a specific workbook).

Jan
 
Jan,
What I really need is to make my own function for fx saving a file, and make
that the only way to save a file (in a specific workbook).
Click to expand...

As in my example, use the Workbook's BeforePrint event for this, in
the specific workbook.

Other than that, you can try to intercept all the commands and
override all the shortcuts, but you'll have a bunch of angry users.
Search the Google groups to find examples - none are foolproof.

HTH,
Bernie
MS Excel MVP
 
Thanks. I'll look into it.

Jan

Bernie Deitrick said:
Jan,


As in my example, use the Workbook's BeforePrint event for this, in
the specific workbook.

Other than that, you can try to intercept all the commands and
override all the shortcuts, but you'll have a bunch of angry users.
Search the Google groups to find examples - none are foolproof.

HTH,
Bernie
MS Excel MVP
Click to expand...
 
Back
Top