VBA Print Erklæring - Hvordan bruges Excel VBA til udskrift? (med eksempler)

Indholdsfortegnelse

Hvad er udskrivning i VBA Excel?

Udskrivning i VBA svarer meget til udskrivningen i Excel, når vi har vigtige data i Excel eller regneark, er den eneste måde at have dem på sikker at gemme dem i pdf eller udskrive dem, til udskrivning er vi nødt til at opsætte udskriftskommandoen i VBA først, før du bruger den, hvad denne kommando gør, hvis udskriver eller skriver dataene i en anden fil.

Hvad er udskrivning i VBA Excel?

VBA-udskrift er intet, men som normalt er der ingen forskel i, hvordan vi udskriver i det almindelige regneark. Ved hjælp af Excel VBA-kode kan vi udskrive hele regnearkdataene. Vi kan udskrive projektmappen, diagrammerne, det specificerede interval osv.

Efter alt det hårde arbejde, vi har gjort for at præsentere rapporten for lederen, sender vi normalt e-mails. Men i nogle tilfælde på mødet har din leder brug for en papirkopi af dine rapporter. I disse scenarier skal du udskrive den rapport, du har, i regnearket. En af grundene til, at din manager har brug for en udskrift af rapporten, kan være en meget stor rapport, der skal læses på computeren. I et regneark skal du allerede være fortrolig med udskrivning af rapporterne. I denne artikel viser vi dig, hvordan du udskriver ved hjælp af VBA-kodning. Følg denne artikel i de næste 15 minutter for at lære at udskrive rapporter i VBA.

Syntaks for VBA PrintOut i VBA Excel

Inden vi ser syntaksen, lad mig først afklare dette. Hvad udskriver vi? Vi udskriver intervaller, diagrammer, regneark, projektmapper. Så metoden PrintOut () er tilgængelig med alle disse mål.

(Fra): Fra hvilken side af udskrivningen, der skal starte. Hvis vi ikke leverer nogen værdi, behandles den som fra første side.

(Til): Hvad skal den sidste side udskrives? Hvis den ignoreres, udskrives den til sidste side.

(Kopier): Hvor mange kopier, du har brug for at udskrive.

(Preview): Vil du se forhåndsvisning af udskrivningen, før du fortsætter med at udskrive. Hvis ja, er SAND argumentet, hvis ikke FALSK, er argumentet.

Eksempler på udskrivning i VBA Excel

Nedenfor er eksemplerne på udskrivning i VBA Excel.

Til illustration har jeg oprettet dummy-data som vist på nedenstående billede.

Nu skal vi udskrive rapporten fra A1 til D14. Dette er mit sortiment. Indtast området i VBA-koden for at få adgang til PrintOut-metoden.

Kode:

Sub Print_Example1 () Range ("A1: D14") End Sub

Nu får du adgang til PrintOut-metoden.

Kode:

Sub Print_Example1 () Range ("A1: D14"). PrintOut End Sub

Jeg rører ikke ved nogen af parametrene. Dette er nok til at udskrive det valgte interval. Hvis jeg kører denne kode, udskriver den området fra A1 til D14-celle.

Parametre for udskrivningsmetode i VBA Excel

Nu har jeg kopieret og indsat de samme data for at bruge andre parametre i PrintOut-metoden i VBA Excel.

Når vi vil udskrive hele arket, kan vi henvise til hele arket som aktivt ark. Dette dækker hele arket i det.

Kode til udskrivning af hele regnearket.

Kode:

Sub Print_Example1 () ActiveSheet.UsedRange.PrintOut 'Dette udskriver hele det anvendte arkområde. Afslut sub

Kode til henvisning til arknavnet .

Kode:

Sub Print_Example1 () Sheets ("Ex 1"). UsedRange.PrintOut 'Dette udskriver også hele det anvendte område på arket kaldet Ex 1. End Sub

Kode til udskrivning af alle regneark i projektmappen .

Kode:

Sub Print_Example1 () Worksheets.UsedRange.PrintOut 'Dette udskriver også hele det anvendte interval for alle arkene i projektmappen. Afslut sub

Kode til udskrivning af hele projektmappedata .

Kode:

Sub Print_Example1 () ThisWorkbook.UsedRange.PrintOut 'Dette udskriver også hele det anvendte interval for hele arket i projektmappen. Afslut sub

Kode, der kun udskriver det valgte område .

Kode:

Sub Print_Example1 () Selection.PrintOut 'Dette udskriver kun det valgte område End Sub

Hvordan bruges parametrene til udskrivningsmetoden i Excel VBA?

Nu vil vi se, hvordan man bruger parametrene for udskrivningsmetoden. Som jeg fortalte, havde jeg udvidet dataene til at bruge andre egenskaber.

Det vil helt sikkert ikke blive udskrevet i et enkelt ark. Vælg området som A1 til S29.

Kode:

Sub Print_Example2() Range ("A1:S29") End Sub

Now select the print out method.

Code:

Sub Print_Example2() Range("A1:S29").PrintOut End Sub

The first & second parameters are From & To, what is the starting & ending pages position. By default, it will print all the pages, so I don’t touch this part. Now I want to see the print preview, so I will choose Preview as TRUE.

Code:

Sub Print_Example2() Range("A1:S29").PrintOut Preview:=True End Sub

Now I will run this code. We will see the print preview.

This is coming in 2 pages.

So first, I want to set up the page to come in a single sheet. Use the below code to set up the page to come in one sheet.

Code:

Sub Print_Example2 () Med regneark ("Eksempel 1"). PageSetup .Zoom = Falsk .FitToPagesTall = 2 .FitToPagesWide = 1 .Orientation = xlLandscape End With ActiveSheet.PrintOut Preview: = True End Sub