This seems to work...

Application.Dialogs(xlDialogPrint).Show 2,1,ThisWorkbook.Sheets.Count

--
Rick (MVP - Excel)


"Luc" wrote in message
...
Hoi there,

I want to use the code "Application.Dialogs(xlDialogPrint).Show", but by
default i would like that 'All the worksheets" are selected when this
dialog opens.

Can it be done ???


Thanks,

Luc