Cod VBA pentru butonul de imprimare în Excel (5 exemple)

Hugh West

16-10-2023 Macros & Excel VBA
  • Imparte Asta
Hugh West

Dacă putem seta un buton de imprimare personalizat în foaia de lucru Excel, atunci poate fi foarte ușor de utilizat și poate economisi timp pentru imprimarea foilor. Prin utilizarea Macros VBA , o putem face cu ușurință. Așadar, acest articol vă va oferi 5 macro-uri simple de utilizat VBA codul pentru butonul de imprimare din Excel.

Descărcați caietul de practică

Puteți descărca șablonul Excel gratuit de aici și puteți exersa pe cont propriu.

Cod VBA pentru a crea butonul de imprimare.xlsm

5 Exemple de utilizare a codului VBA pentru butonul de imprimare în Excel

Să facem mai întâi cunoștință cu setul nostru de date care reprezintă niște vânzătorului vânzări în diferite Regiuni .

1. Utilizați codul VBA pentru a face butonul de imprimare pentru caseta de dialog Print în Excel

În primul rând, vom crea un fișier Butonul de imprimare și apoi va scrie coduri pentru acesta.

Pași:

  • Faceți clic pe după cum urmează: Dezvoltator >> Introduceți >> Caseta cu butoane.

La scurt timp după aceea, veți primi un semnul plus (+) în cursor .

  • Drag că cursor în funcție de dorința dvs. dimensiunea butonului și după un timp, un caseta de dialog numit Atribuire macro se va deschide.

  • Dați un nume și apăsați Nou .

A VBA va apărea o fereastră.

  • Apoi introduceți următoarele coduri în el. 
 Sub DialogBox() Application.Dialogs(xlDialogPrint).Show End Sub
  • Acum întoarce-te la dvs. foaie .

Defalcarea codului

  • Aici, am creat un Sub procedură, DialogBox .
  • Apoi a folosit Dialoguri (xlDialogPrint).Show pentru a deschide fereastra Caseta de dialog Imprimare .

Butonul este creat.

  • Faceți clic dreapta pe pe buton și selectați Editare text de la Meniul contextual pentru a schimba numele butonului.

  • Mai târziu, doar tip la nume și click dumneavoastră șoarece oriunde în afara butonului .

Apoi, trebuie doar să apăsați butonul Buton .

Apoi veți obține Caseta de dialog Imprimare . dacă vrei poți Imprimare acum.

Dacă nu aveți nici un Imprimantă în acest moment puteți Salvați aceasta ca PDF . pentru utilizare ulterioară sau pentru Imprimare mai târziu.

  • Acum apăsați OK .

  • În acest moment doar dați un nume și apăsați Salvați .

Aici este imprimat PDF .

Citește mai mult: Cum să ajustați setările de imprimare în Excel (8 trucuri adecvate)

2. Utilizați codul VBA pentru a realiza butonul de imprimare pentru foaia activă

Aici, vom folosi VBA la print un Activ Foaie .

Pași:

  • Urmați prima etapă cu două trepte din prima secțiune pentru a crea buton și Atribuiți o macro .
  • Scrieți un Denumire macro și apăsați Nou .

La scurt timp după aceea, un VBA se va deschide o fereastră.

  • Apoi scrie următoarele coduri în ea... 
 Sub ActiveSheet() ActiveSheet.PrintOut End Sub
  • Mai târziu, întoarce-te la

Defalcarea codului

  • Aici, am creat un Sub procedură, ActiveSheet .
  • Apoi a folosit PrintOut la selectați la foaie activă și print ea.
  • Acum doar... apăsați la Buton .

A caseta de dialog numit Salvați ieșirea imprimată ca se va deschide.

  • Dați un nume și apăsați Salvați .

Apoi, veți obține imprimat PDF .

Puteți schimba cu ușurință imprimantă dacă aveți nevoie de ea.

  • Faceți clic pe pe Fișier alături de Acasă

  • Apoi selectați Imprimare și opțiunea click pe drop-down pentru a selecta un Imprimantă .

Citește mai mult: Cum să imprimați toate foile în Excel (3 metode)

3. Aplicați codul VBA pentru a crea un buton de imprimare pentru foile selectate în Excel

Dacă doriți să Imprimare specific foi selectate atunci este de asemenea posibil să se folosească VBA .

Pași:

  • Urmați prima etapă cu două trepte din prima secțiune pentru a crea buton și atribuie a macro .
  • Apoi scrieți un Denumire macro și apăsați Nou .

La scurt timp după aceea, un VBA se va deschide o fereastră.

  • Mai târziu, tip următoarele coduri în ea... 
 Sub SelectedSheets() ActiveWindow.SelectedSheets.PrintOut End Sub

Apoi întoarce-te la dvs. foaie .

Defalcarea codului

  • Aici, am creat un Sub procedură, Foi selectate .
  • Apoi a folosit ActiveWindow la selectați foaia de la activ Excel fereastră .
  • În continuare, s-a folosit PrintOut pentru a imprima mai multe selectat foi .
  • Acum Selectați foi și apăsați butonul Butonul de imprimare . am selectat două foi.

  • Dați un nume pentru PDF și apăsați Salvați .

The PDF fișierul are t wo pagini pentru două foi .

Citește mai mult: Cum să imprimați foi specifice utilizând macro VBA în Excel (4 moduri)

Lecturi similare:

  • Cum să imprimați o foaie Excel în format A4 (4 moduri)
  • Cum să păstrați antetul în Excel la imprimare (3 moduri)
  • Excel VBA: Cum setați zona de imprimare în mod dinamic (7 moduri)
  • Cum să imprimați foaia Excel cu linii (3 moduri simple)
  • Cum să imprimați un grafic în Excel (5 moduri)

4. Încorporați Excel VBA pentru a crea butonul de imprimare pentru o anumită foaie cu intervalul selectat

Aici, vom face o Butonul de imprimare la print a intervalul selectat de la un fișă specifică .

Pași:

  • Urmați prima etapă cu două trepte din prima secțiune pentru a crea buton și atribuiți o macro.
  • Scrieți un Denumire macro și apăsați Nou .

La scurt timp după aceea, un VBA se va deschide o fereastră.

  • Apoi scrie următoarele coduri - 
 Sub SpecificSheetnRange() With Sheets("SpecificSheet+Range") .PageSetup.PrintArea = "B2:D11" .PrintOut End With End Sub
  • Mai târziu, întoarceți-vă la foaia dvs.

Defalcarea codului

  • Aici, am creat un Sub procedură, SpecificSheetnRange .
  • Apoi a folosit Cu declarație către selectați a specific
  • Următorul, PrintArea = "B2:D11".PrintOut va selectați la gama de la fișă specifică și va Imprimare it.
  • Acum doar... apăsați la Butonul de imprimare .

  • Setați un nume pentru PDF și apăsați Salvați .

Este tipărit fișă specifică.

Citește mai mult: Excel VBA: Setați zona de imprimare pentru intervale multiple (5 exemple)

5. Încorporați Excel VBA pentru a crea un buton de imprimare pentru foaia activă cu intervalul selectat

De asemenea, puteți selectați un interval de la foaie activă și poate face un Butonul de imprimare la print ea folosind VBA .

Pași:

  • Urmați prima etapă cu două trepte din prima secțiune pentru a crea buton și atribuiți un macro .
  • Mai târziu, scrieți un Denumire macro și apăsați Nou .

La scurt timp după aceea, un VBA se va deschide o fereastră.

  • În VBA fereastră, scrie următoarele coduri - 
 Sub ActiveSheetnRange() Range("B2:D11").PrintOut End Sub
  • Apoi întoarce-te la dvs. foaie .

Defalcarea codului

  • Aici, am creat un Sub procedură, ActiveSheetnRange .
  • Apoi a folosit Range("B2:D11").PrintOut la selectați a gama și imprimare.
  • Apăsați butonul Butonul de imprimare .

  • Dați un nume și apăsați Salvați .

Apoi veți obține gama tipărită .

Citește mai mult: Butonul Excel pentru a imprima foi specifice (cu pași simpli)

Concluzie

Sper că procedurile descrise mai sus vor fi suficient de bune pentru a utiliza codul VBA pentru butonul de imprimare în Excel. Nu ezitați să puneți orice întrebare în secțiunea de comentarii și vă rog să-mi oferiți feedback.

Postarea anterioară Cum să găsiți ecuația unei linii de trend în Excel (3 moduri adecvate)
Postarea următoare Cum se utilizează VLOOKUP dacă celula conține un cuvânt în text în Excel

Hugh West este un trainer și analist Excel cu o experiență de peste 10 ani în industrie. Deține o diplomă de licență în contabilitate și finanțe și un master în administrarea afacerilor. Hugh are o pasiune pentru predare și a dezvoltat o abordare unică de predare care este ușor de urmărit și de înțeles. Cunoștințele sale experte despre Excel au ajutat mii de studenți și profesioniști din întreaga lume să-și îmbunătățească abilitățile și să exceleze în cariera lor. Prin blogul său, Hugh își împărtășește cunoștințele lumii, oferind tutoriale gratuite Excel și instruire online pentru a ajuta persoanele și companiile să-și atingă întregul potențial.