VBA-kód az Excel nyomtatási gombjához (5 példa)

  • Ossza Meg Ezt
Hugh West

Ha be tudunk állítani egy egyéni Nyomtatás gombot az Excel munkalapunkban, akkor nagyon felhasználóbarát és időtakarékos lehet a lapok nyomtatásához. A következők használatával VBA makrók , könnyen megtehetjük. Így ez a cikk 5 egyszerű makrót fog nyújtani Önnek, hogy használja VBA kód az Excel nyomtatás gombjához.

Gyakorlati munkafüzet letöltése

Az ingyenes Excel-sablont letöltheti innen, és saját maga is gyakorolhatja.

VBA kód nyomtatási gomb létrehozásához.xlsm

5 példa a VBA kód használatára a nyomtatási gombhoz az Excel-ben

Először is ismerkedjünk meg az adathalmazunkkal, amely néhány eladó értékesítés a különböző Régiók .

1. Használja a VBA-kódot az Excel nyomtatási párbeszédpanel nyomtatási gombjának nyomtatásához

Először is, létrehozunk egy Nyomtatás gomb majd kódokat fog írni hozzá.

Lépések:

  • Kattintson a címre. a következőképpen: Fejlesztő >> Beillesztés >> Gombos doboz.

Nem sokkal később kap egy plusz jel (+) az Ön kurzor .

  • Drag hogy kurzor az Ön által kívánt gomb mérete és egy idő után egy párbeszédpanel a nevet viseli. Makró hozzárendelése megnyílik.

  • Adj egy név és press Új .

A VBA ablak jelenik meg.

  • Ezután írja be a következő kódokat.
 Sub DialogBox() Application.Dialogs(xlDialogPrint).Show End Sub 
  • Most visszamenni az Ön lap .

Kód lebontása

  • Itt létrehoztam egy Sub eljárás, DialogBox .
  • Ezután használt Párbeszédek (xlDialogPrint).Show a Nyomtatás párbeszédpanel .

A gomb létrejön.

  • Kattintson a jobb gombbal a címre. a gomb és válassza a Szöveg szerkesztése a Kontextus menü a gomb nevének megváltoztatásához.

  • Később, csak típus a név és kattints a címre. a egér bárhol a gombon kívül .

Ezután csak nyomja meg a Gomb .

Ezután megkapja a Nyomtatás párbeszédpanel . Ha akarod, akkor Nyomtatás most.

Ha nincs Nyomtató ebben a pillanatban Mentés azt, mint PDF . további felhasználásra vagy Nyomtatás később.

  • Most nyomja meg OK .

  • Ebben a pillanatban csak adj egy név és nyomja meg a Mentés .

Itt van a nyomtatott PDF .

Bővebben: Hogyan lehet beállítani a nyomtatási beállításokat az Excelben (8 megfelelő trükk)

2. VBA kód használata az aktív lap nyomtatási gombjának elkészítéséhez

Itt a VBA a címre. print egy Aktív Sheet .

Lépések:

  • Kövesse a első két lépés az első szakaszból létrehozni a gomb és Makró hozzárendelése .
  • Írjon egy Makró neve és nyomja meg a Új .

Nem sokkal később egy VBA ablak fog megnyílni.

  • Akkor írja a következőket kódok benne...
 Sub ActiveSheet() ActiveSheet.PrintOut End Sub 
  • Később, visszamenni a

Kód lebontása

  • Itt létrehoztam egy Sub eljárás, ActiveSheet .
  • Ezután használt PrintOut a címre. válassza ki a címet. a aktív lap és print azt.
  • Most csak sajtó a Gomb .

A párbeszédpanel a nevet viseli. Kimenet mentése Nyomtatás mint megnyílik.

  • Adj egy név és nyomja meg a Mentés .

Ezután megkapja a nyomtatott PDF .

Könnyen megváltoztathatja a nyomtató ha szükséged van rá.

  • Kattintson a címre. a oldalon. Fájl a Home

  • Ezután válassza ki Nyomtatás opció és kattints a címre. a drop-down kiválasztani egy Nyomtató .

Bővebben: Hogyan nyomtathatja ki az összes lapot az Excelben (3 módszer)

3. VBA-kód alkalmazása az Excel kiválasztott lapjainak nyomtatási gombjának létrehozására

Ha azt szeretné, hogy Nyomtatás specifikus kiválasztott lapok akkor az is lehetséges, hogy a VBA .

Lépések:

  • Kövesse a első két lépés az első szakaszból létrehozni a gomb és assign a makró .
  • Ezután írjon egy Makró neve és nyomja meg a Új .

Nem sokkal később egy VBA ablak fog megnyílni.

  • Később, típus a következőket kódok benne...
 Sub SelectedSheets() ActiveWindow.SelectedSheets.PrintOut End Sub 

Akkor visszamenni az Ön lap .

Kód lebontása

  • Itt létrehoztam egy Sub eljárás, SelectedSheets .
  • Ezután használt ActiveWindow a címre. válassza ki a lapot a aktív Excel ablak .
  • Ezután használt PrintOut nyomtatáshoz többszörös kiválasztott lapok .
  • Most kiválasztott lapok és nyomja meg a Nyomtatás gomb . két lapot választottam ki.

  • Adj egy név a PDF és nyomja meg a Mentés .

A PDF fájlnak van t wo pages a két lap .

Bővebben: Hogyan nyomtassunk ki bizonyos lapokat az Excel VBA makró segítségével (4 mód)

Hasonló olvasmányok:

  • Hogyan nyomtassuk ki az Excel lapot A4 méretben (4 mód)
  • Hogyan tartsa meg a fejlécet az Excelben nyomtatáskor (3 mód)
  • Excel VBA: A nyomtatási terület dinamikus beállítása (7 mód)
  • Hogyan nyomtassuk ki az Excel Sheet-et vonalakkal (3 egyszerű módja)
  • Grafikon nyomtatása Excelben (5 mód)

4. Beágyazott Excel VBA a nyomtatási gomb létrehozásához a kiválasztott tartományban lévő adott laphoz tartozó nyomtatási gombhoz

Itt, készítünk egy Nyomtatás gomb a címre. print a kiválasztott tartomány egy külön lap .

Lépések:

  • Kövesse a első két lépés az első szakaszból létrehozni a gomb és rendeljen hozzá egy makrót.
  • Írjon egy Makró neve és nyomja meg a Új .

Nem sokkal később egy VBA ablak fog megnyílni.

  • Akkor írja a következőket kódok -
 Sub SpecificSheetnRange() With Sheets("SpecificSheet+Range") .PageSetup.PrintArea = "B2:D11" .PrintOut End With End Sub 
  • Később térj vissza a lapodhoz.

Kód lebontása

  • Itt létrehoztam egy Sub eljárás, SpecificSheetnRange .
  • Ezután használt A címen nyilatkozat a válassza ki a címet. a specifikus
  • Következő, PrintArea = "B2:D11".PrintOut will válassza ki a címet. a tartomány a külön lap és Nyomtatás azt.
  • Most csak sajtó a Nyomtatás gomb .

  • Állítson be egy név a PDF és nyomja meg a Mentés .

Ez a nyomtatott egyedi lap.

Bővebben: Excel VBA: Nyomtatási terület beállítása több tartományhoz (5 példa)

5. Beágyazott Excel VBA nyomtatási gomb létrehozása az aktív laphoz a kiválasztott tartományban

Továbbá, akkor is válasszon ki egy tartományt a aktív lap és tud egy Nyomtatás gomb a címre. print a VBA .

Lépések:

  • Kövesse a első két lépés az első szakaszból létrehozni a gomb és rendeljen hozzá egy makró .
  • Később írjon egy Makró neve és nyomja meg a Új .

Nem sokkal később egy VBA ablak fog megnyílni.

  • A VBA ablak, írja a következőket kódok -
 Sub ActiveSheetnRange() Range("B2:D11").PrintOut End Sub 
  • Akkor visszamenni az Ön lap .

Kód lebontása

  • Itt létrehoztam egy Sub eljárás, ActiveSheetnRange .
  • Ezután használt Range("B2:D11").PrintOut a címre. válassza ki a címet. a tartomány és nyomtatás.
  • Nyomja meg a Nyomtatás gomb .

  • Adj egy név és nyomja meg a Mentés .

Ezután megkapja a nyomtatott tartomány .

Bővebben: Excel gomb az egyes lapok nyomtatásához (egyszerű lépésekkel)

Következtetés

Remélem, hogy a fent leírt eljárások elég jók lesznek ahhoz, hogy a VBA kódot használjam a nyomtatás gomb Nyugodtan tegyen fel bármilyen kérdést a megjegyzés rovatban, és kérem, adjon visszajelzést.

Hugh West nagy tapasztalattal rendelkező Excel-oktató és elemző, több mint 10 éves tapasztalattal az iparágban. Számvitel és pénzügy szakos alapdiplomát, valamint üzleti adminisztrációból mesterképzést szerzett. Hugh szenvedélye a tanítás, és egyedülálló tanítási megközelítést dolgozott ki, amely könnyen követhető és érthető. Az Excelben szerzett szakértői tudása világszerte több ezer diáknak és szakembernek segített abban, hogy készségeiket és karrierjüket kiválóan teljesítsék. Hugh blogján keresztül megosztja tudását a világgal, ingyenes Excel-oktatóanyagokat és online képzéseket kínálva, hogy segítse az egyéneket és a vállalkozásokat teljes potenciáljuk kibontakoztatásában.