Öppna dialogrutan för utskrift med ett Excel -makro och ställ in sidnumren

Öppna dialogrutan Skriv ut från ett makro och ange utskriftsalternativ enligt önskemål

Det är enkelt att skriva ut en Excel -arbetsbok eller tabell. Men om du vill skriva ut från ett makro är det svårt att replikera alla alternativ.

Du behöver inte ens. Du kan hämta utskriftsfönstret från ett Excel -makro och förinställa vissa alternativ. Följande VBA -makro visar hur du gör detta:

Sub Position Skriv ut PagesOn ()
Konststart som heltal = 3
Const Ende som heltal = 5
Application.Dialogs (xlDialogPrint). Visa arg1: = 2, _
arg2: = start, arg3: = slut
Avsluta Sub

Använd makrot för att öppna dialogrutan SKRIV UT. Utskriftsalternativen är inställda så att du inte skriver ut hela tabellen utan bara skriver ut sidorna 3 till 5. Följande illustration visar hur resultatet ser ut:

I makrot styrs definitionen av utskriftssidorna med hjälp av de två konstanterna START och ENDE. Använd dessa siffror för att ange vilken sida utskriften ska börja och sluta med.