Conflict between xlDialogSendMail and xlDialogPrintPreview

[Peter Ostermann]

Hi folks,

using
Application.Dialogs(xlDialogPrintPreview).Show by itself
it works fine.

The problem happens after I called
Application.Dialogs(xlDialogSendMail).Show


Calling again the preview, of the to be printed page of the
spreadsheet, it also shows up, but is frozen and not
clickable at all. Only option left is that Excel has to be shut
down.

If needed I can post some surrounding code or give
more details. For any hint I will be more than thankful.

Greetings
Peter

 

[Will Francis]

Hi Steven

You can try inserting the following code into the "This
Workbook" object, it will remove the Share Workbook button
when the sheet is opened and return when the sheet is
closed.

Regards
Will

Private Sub Workbook_Open()
Application.CommandBars("Tools").Reset
Application.CommandBars("Tools").Controls(3).Delete

End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Sheet1").Select
Application.CommandBars("Tools").Reset
End Sub

 

[Peter Ostermann]

Hi Will,
thanks a lot for your hint. I placed your code
into "This Workbook" object. But it did not
solve the problem yet.

Greetings to UK
Peter

 

[Peter Ostermann]

The problem is for everybody easily reproducible:
1. place a button on a sheet
2. the button calls a form containing 2 buttons:
a. preview
starting: Application.Dialogs(xlDialogPrintPreview).Show by
b. mail
starting: Application.Dialogs(xlDialogSendMail).Show

test preview: it works
test mail: it works
test preview again: result: ***** frozen *****

So, it really seems to be a Microsoft problem !!

isn't there any MVP maintaining this NG who could give me
a helping hand, any hint?
Thanks.

Best Regards
Peter

 

[Peter Ostermann]

Hi Sandy,

I tried it. It works. Amazing and strange.
Anyway - the British had been all time good for
to crack the Enigma, right? ;)
Thanks a lot Sandy.

Greetings to you and good old England
Peter
www.pkf-ostermann.de

 

[Sandy V]

Hi Peter,

Thank you for your nice reply, I'm glad it worked.

Re Enigma:

The same people also invented something called a computer
and a discipline called programming. They didn't think to
patent either. And neither did another Brit. (Tim Berners-
Lee) when he invented the WWW. It's just the British way!

Regards,
Sandy

-----Original Message-----
Hi Sandy,

I tried it. It works. Amazing and strange.
Anyway - the British had been all time good for
to crack the Enigma, right? ;)
Thanks a lot Sandy.

Greetings to you and good old England
Peter
www.pkf-ostermann.de

Snip