Hej,

I så fall måste du öppna en printdialog med argument:

Application.Dialogs(xlDialogPrint).Show arg1:=2, arg2:=1, arg3:=2, arg4:=1, arg12:=3

Arg1 = skriv ut från blad till blad, Arg2 = från blad, Arg3 = till blad, Arg4 = antal kopior, Arg12 = skriv ut arbetsboken och inte bara aktivt blad

För att infoga en knapp (formulär) är det bara att gå in under Excels huvudmeny och välja "Excel Alternativ". Sen under fliken "Vanliga alternativ" sätter du ett kryss på "Visa fliken utvecklare...". Gå sen till fliken utvecklare och välj "Infoga", klicka på knappen längst upp i vänstra hörnet så infogar du en knapp som du sen kan koppla till ditt makro.

/Oskar