From Excel, create a sheet button and assign it to this macro:
Sub PrintDialog()
Application.Dialogs(xlDialogPrint).Show
End Sub

From Word, use this one:
Sub PrintDialog()

Application.Dialogs(wdDialogFilePrint).Show
End Sub

Or from either application use this routine:
Sub PrintDialog()
If Application.Name = "Microsoft Excel" Then
Application.Dialogs(8).Show
ElseIf Application.Name = "Microsoft Word" Then
Application.Dialogs(88).Show
End If
End Sub


--
Charles
www.officezealot.com


"Ravi" wrote in message
...
Hello

I want to place a 'Button' Control in Excel and Word files.

I want the button to bring up the Print dialogue, just the same way as
going
to FILE -- Print would do

How do I do this?

Thank you