I am trying to run the following VBA macro in Excel:

  Sub cmdPrint_Click()

    Sheets("MySheet").Select
    ActiveSheet.PrintOut

  End Sub

  If I run the macro from the module or from the
  toolbar it works fine.  However if I try to assign
  the macro to a button on a dialogsheet I get runtime
  error: 1004  "Printout method of Worksheet class
  failed" when I click on the button.

  I tried so far adding the line ActiveDialog.Hide
  in case my dialog box was causing a problem, but
  this did not help.

  I have no idea why this won't work and can find it
  in any of my reference manuals.  If anyone knows why
  this fails please email me.

  Thanks
  Joe Feyas

You may want to change the reference to activesheet, perhaps, to a named
sheet, to be sure you refer to the correct sheet.

This is just a guess based on similar problems in the past.

sub option_1
  x=1
end   sub

That sets x =1 when you press the option radio button on the dialiog box.
The when you click OK, the dialoig box goes away and the routine
continues.  The routine should continue sonthing like:

   if x=1 then cmdPrint_Click

Good luck

Application.WorkBooks("MyBook").Worksheets("MySheet").PrintOut,

in case there is a referencing problem...

-Harri