Run an event after a Report is open and showing

[puforee]

I have several reports that I email. To mechanize this for my users I have installed an Email button on a Form. When the user clicks on the Email button the code checks the status of of the form and opens the correct report to be emailed. It then runs the File - Send To -Mail Recipient (as attachment).

This works well in a macro...but I want to change it to code. There seems to be a problem with the DoCmd.RunCommand acCmdSend code in that it shows the send dialog box without the report showing.

So, on Email click, I open the correct report and then the last statement is DoCmd.RunCommand acCmdSend. But the report does not show. Also, if I click cancel on the Send Dialog box I get a VB error on DoCmd.RunCommand acCmdSend. Is it waiting for something?

Is there a way I can ensure the report shows before using the send command?

Thanks,