VBA-kode for utskriftsknapp i Excel (5 eksempler)

  • Dele Denne
Hugh West

Hvis vi kan angi en egendefinert utskriftsknapp i Excel-regnearket vårt, kan det være veldig brukervennlig og tidsbesparende for utskrift av ark. Ved å bruke VBA-makroer kan vi enkelt gjøre det. Så denne artikkelen vil gi deg 5 enkle makroer for å bruke VBA kode for utskriftsknappen i Excel.

Last ned øvelsesarbeidsbok

Du kan last ned den gratis Excel-malen herfra og øv på egen hånd.

VBA-kode for å lage utskriftsknapp.xlsm

5 eksempler på bruk av VBA Kode for utskriftsknapp i Excel

La oss først bli introdusert til datasettet vårt som representerer noen selgeres salg i forskjellige regioner .

1. Bruk VBA-kode for å lage utskriftsknapp for utskriftsdialogboks i Excel

Først lager vi en Skriv ut-knapp og skriver deretter koder for den.

Trinn:

  • Klikk som følger: Utvikler >> Sett inn >> Knappeboks.

Snart etter vil du få et plusstegn (+) i markøren .

  • Dra den markøren i henhold til ønsket knappstørrelse og etter en stund, en dialogboksen kalt Tildel makro åpnes.

  • Gi et navn og trykk på Ny .

Et VBA vindu vises.

  • Skriv deretter inn følgende koder i den-
7304
  • gå tilbake til ark .

Kodeoversikt

  • Her , opprettet jeg en Sub prosedyre, DialogBox .
  • Deretter brukte jeg Dialogs (xlDialogPrint).Show for å åpne Skriv ut dialogboks .

Knappen er opprettet.

  • Høyreklikk knappen og velg Rediger tekst fra Kontekstmenyen for å endre knappens navn.

  • Senere, bare skriv inn navnet og klikk din mus hvor som helst utenfor knappen .

Deretter er det bare å trykke på knappen .

Så får du opp dialogboksen Skriv ut . Hvis du vil, kan du Skrive ut den nå.

Hvis du ikke har noen skriver for øyeblikket, kan du Lagre den som PDF . for videre bruk eller for å Skrive ut senere.

  • Trykk nå OK .

  • I dette øyeblikket er det bare å gi et navn og trykk Lagre .

Her er den trykte PDF .

Les mer: Hvordan justere utskriftsinnstillinger i Excel (8 passende triks)

2. Bruk VBA-kode for å lage utskriftsknapp for aktivt ark

Her bruker vi VBA til å skrive ut en aktiv Ark .

Trinn:

  • Følg de første to-trinnene fra den første delen for å lage knapp og Tilordne en makro .
  • Skriv et Makronavn og trykk på Ny .

Snart etter åpnes et VBA vindu.

  • Skriv Skriv følgende koder i den-
5603
  • Senere gå tilbake til

Kodeoversikt

  • Her opprettet jeg en Sub prosedyre , ActiveSheet .
  • Brukte deretter PrintOut for å velge det aktive arket og skrive ut det .
  • trykker du på knappen .

A dialogboks navngitt Lagre utskrift som åpnes.

  • Gi et navn og trykk Lagre .

Så får du den trykte PDF .

Du kan endre enkelt skriver hvis du trenger det.

  • Klikk Fil ved siden av Hjem

  • Velg deretter Skriv ut og klikk rullegardinmenyen for å velge a Skriver .

Les mer: Hvordan skrive ut alle ark i Excel (3 metoder)

3. Bruk VBA-kode for å lage utskriftsknapp for utvalgte ark i Excel

Hvis du vil Skrive ut spesifikke valgte ark så er det også mulig å bruke VBA .

Trinn:

  • Følg de første to-trinnene fra den første delen for å lage knapp og tilordne en makro .
  • Skriv deretter et Makronavn og trykk Ny .

Snart etter,et VBA vindu åpnes.

  • Senere skriv inn følgende koder i det-
3316

Deretter gå tilbake til arket .

Kodeoversikt

  • Her opprettet jeg en Sub prosedyre, SelectedSheets .
  • Deretter brukte jeg ActiveWindow til velg ark fra aktivt Excel vindu .
  • Deretter brukte du PrintOut for å skrive ut flere valgte ark .
  • velg ark og trykk på Skriv ut . Jeg valgte to ark.

  • Gi et navn for PDF-en og trykk på Lagre .

PDF -filen har t to sider for de to arkene .

Les mer: Hvordan skrive ut spesifikke ark med VBA-makro i Excel (4 måter)

Lignende avlesninger:

  • Hvordan skrive ut Excel-ark i A4-størrelse (4 måter)
  • Hvordan beholde Overskrift i Excel ved utskrift (3 måter)
  • Excel VBA: Hvordan sette utskriftsområde dynamisk (7 måter)
  • Hvordan skrive ut Excel Ark med linjer (3 enkle måter)
  • Hvordan skrive ut graf i Excel (5 måter)

4. Bygg inn Excel VBA for å lage utskriftsknapp for spesifikt ark med valgt område

Her vil vi lage en Skriv ut-knapp for å skrive ut til en valgt område fra et spesifikt ark .

Trinn:

  • Følg det førsteto-trinn fra den første delen for å lage knappen og tilordne en makro.
  • Skriv et Makronavn og trykk Ny .

Snart etter åpnes et VBA vindu.

  • Deretter skriv følgende koder
3576
  • Gå tilbake til arket ditt senere.

Kodeoversikt

  • Her opprettet jeg en Sub prosedyre, Spesifikt arkområde .
  • Bruket deretter Med -setning for å velge en spesifikk
  • Neste, PrintArea = “B2:D11”.PrintOut vil velge området fra det spesifikke arket og vil skrive ut det.
  • Nå er det bare å trykke Skriv ut-knappen .

  • Angi et navn for PDF og trykk Lagre .

Det er det utskrevne spesifikke arket.

Les mer: Excel VBA: Angi utskriftsområde for flere områder (5 eksempler)

5. Bygg inn Excel VBA for å lage utskriftsknapp for aktivt ark med valgt område

Du kan også velge et område fra det aktive arket og lage en 1>Skriv ut-knapp for å skrive ut med VBA .

Trinn:

  • Følg første to-trinn fra den første delen for å lage knappen og tilordne en makro .
  • Senere skriver du et makronavn og trykk Ny .

Snart etter, en VBA vinduet åpnes.

  • I VBA vinduet skriver du følgende koder
5903
  • Deretter går du tilbake til arket .

Kodeoversikt

  • Her opprettet jeg en Sub prosedyre, ActiveSheetnRange .
  • Deretter brukte jeg Range(“B2:D11”).PrintOut for å velge et område og utskrift.
  • Trykk på Skriv ut .

  • Gi et navn og trykk på Lagre .

Da får du det utskrevne området .

Les mer: Excel-knapp for å skrive ut spesifikke ark (med enkle trinn)

Konklusjon

Jeg håper prosedyrene beskrevet ovenfor vil være god nok til å bruke VBA-kode for print-knappen i Excel. Still gjerne spørsmål i kommentarfeltet og gi meg tilbakemelding.

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.