Hvordan skrive ut data med Excel VBA (en detaljert veiledning)

  • Dele Denne
Hugh West

En av de viktigste og mest brukte oppgavene vi kommer over mens vi jobber med VBA i Excel, er å skrive ut de nødvendige dataene. I dag i denne artikkelen skal jeg vise deg hvordan du kan skrive ut data i Excel VBA med riktige eksempler og illustrasjoner.

Last ned øvelsesarbeidsbok

Last ned denne øvelsesarbeidsboken for å trene mens du leser denne artikkelen.

VBA Print.xlsm

Trinn for å skrive ut data med Excel VBA

Her har jeg et datasett med navn, typer og priser til noen bøker fra en bokhandel som heter Martin Bookstore.

I dag skal vi lære hvordan vi kan skrive ut dette datasettet med VBA .

Trinn 1: Åpne VBA Editor for å skrive ut i Excel

Trykk ALT+F11 på tastaturet. Den åpner Visual Basic Editor.

Les mer: Hvordan angi utskriftsområde i Excel ( 5 metoder)

Trinn 2: Sette inn en ny modul for utskrift i Excel

Gå til Sett inn -alternativet i VBA -verktøylinjen. Klikk Sett inn > Modul for å åpne en ny modul.

Relatert innhold: Hvordan skrive ut rutenett i Excel (2 måter)

Trinn 3: Angi VBA-koden for utskrift i Excel

En ny modul kalt Module1 åpnes. Skriv inn følgende VBA -kode der.

⧭ VBA-kode:

8014

⧭ Merknader :

  • Her vil jeg skrive utaktivt regneark for arbeidsboken min. For å skrive ut et hvilket som helst annet regneark, skriv navnet på regnearket direkte i koden.

For å skrive ut regnearket som heter Ark1 , bruk for eksempel:

ActiveWorkbook.Worksheets(“Sheet1”).PrintOut copies:=1

  • Du kan også skrive ut fra en arbeidsbok som ikke er aktiv. For eksempel, for å skrive ut Ark1 fra en arbeidsbok kalt Workbook1 , bruk:

Workbook(“Workbook1”).Worksheets(“Sheet1” ”).PrintOut-kopier:=1

  • Her skriver vi bare ut én kopi av regnearket. Hvis du vil skrive ut mer enn én kopi, endre egenskapen kopier tilsvarende.
  • Hvis du vil skrive ut flere regneark og sortere dem mens du skriver ut, er det også et alternativ for deg. PrintOut -funksjonen til VBA har en egenskap kalt Collate . Sett den til å være True .

ActiveWorkbook.ActiveSheet.PrintOut copies:=10, Collate:=True

Relatert innhold: Excel VBA: Hvordan sette utskriftsområde dynamisk (7 måter)

Lignende avlesninger:

  • Excel-knapp for å skrive ut spesifikke ark (med enkle trinn)
  • Hvordan skrive ut horisontalt i Excel (4 metoder)
  • Skriv ut flere Excel Ark til enkelt PDF-fil med VBA (6 kriterier)
  • Skriv ut titler i Excel er deaktivert, hvordan aktiverer du det?
  • Hvordan skrive ut Excel-ark i A4-størrelse (4 måter)

Trinn4: Kjøre VBA-koden for å skrive ut i Excel

Etter å ha skrevet inn VBA -koden riktig, kjør Makroen ved å klikke Kjør alternativet i VBA verktøylinjen.

Relatert innhold: Excel VBA: Angi utskriftsområde for flere områder ( 5 eksempler)

Trinn 5: Det endelige resultatet: Skriv ut med VBA

Hvis du klarer å skrive ned koden og kjøre den, vil du finne regnearket ble skrevet ut på skriveren din, og et lite vindu dukket opp som dette.

Relatert innhold: Excel VBA: Print Range of Cells ( 5 enkle metoder)

Ting å huske

Her har vi brukt PrintOut -funksjonen til VBA . Det er en annen funksjon i VBA kalt PrintPreview , som viser forhåndsvisningen av dataene før utskrift.

Syntaksen til PrintPreview -funksjonen er samme som PrintOut -funksjonen, bare bruk PrintPrview i stedet for PrintOut .

ActiveWorkbook.ActiveSheet.PrintPreview

Den vil vise forhåndsvisningen av regnearket før utskrift.

Konklusjon

Så, dette er metoden som du kan skrive ut data fra et Excel-regneark med VBA . Har du noen spørsmål? Spør oss gjerne. Og ikke glem å besøke siden vår ExcelWIKI for flere innlegg og oppdateringer.

Hugh West er en svært erfaren Excel-trener og analytiker med over 10 års erfaring i bransjen. Han har en bachelorgrad i regnskap og finans og en mastergrad i bedriftsøkonomi. Hugh har en lidenskap for undervisning og har utviklet en unik undervisningstilnærming som er enkel å følge og forstå. Hans ekspertkunnskap om Excel har hjulpet tusenvis av studenter og fagfolk over hele verden med å forbedre sine ferdigheter og utmerke seg i karrieren. Gjennom bloggen sin deler Hugh sin kunnskap med verden, og tilbyr gratis Excel-opplæringer og nettbasert opplæring for å hjelpe enkeltpersoner og bedrifter å nå sitt fulle potensial.