[RyAr]

Buenas, he metido lo que me has dicho y y un PrintDialog por si acaso, y em da error en al linea DlgPrint:= ExcelApp.Dialogs.Item[xlDialogPrint];

He cambiar algun nombre o meter algo mas?

Saludos