En av de viktigaste och mest använda uppgifterna som vi stöter på när vi arbetar med VBA i Excel är att skriva ut de nödvändiga uppgifterna. Idag i den här artikeln visar jag hur du kan skriva ut data i Excel. VBA med lämpliga exempel och illustrationer.

Ladda ner övningsboken

Ladda ner den här arbetsboken för att träna medan du läser den här artikeln.

Steg för att skriva ut data med Excel VBA

Här har jag en datamängd med följande Namn, typer , och Priser av några böcker från en bokhandel som heter Martin Bookstore.

Idag ska vi lära oss hur vi kan skriva ut denna datamängd med hjälp av VBA .

Steg 1: Öppna VBA-redigeraren för att skriva ut i Excel

Tryck på ALT+F11 på tangentbordet. Det öppnar Visual Basic Redaktör.

Läs mer: Hur man ställer in utskriftsområdet i Excel (5 metoder)

Steg 2: Infoga en ny modul för utskrift i Excel

Gå till Infoga i alternativet i VBA verktygsfältet. Klicka på Infoga> Modul för att öppna en ny modul.

Relaterat innehåll: Hur man skriver ut rasterlinjer i Excel (2 sätt)

Steg 3: Ange VBA-koden för att skriva ut i Excel

En ny modul med namnet Modul1 öppnas. Ange följande VBA kod där.

⧭ VBA-kod:

 Sub VBA_Print() ActiveWorkbook.ActiveSheet.PrintOut copies:=1 End Sub 

⧭ Anteckningar:

• Här vill jag skriva ut det aktiva arbetsbladet i min arbetsbok. Om du vill skriva ut något annat arbetsblad skriver du namnet på arbetsbladet direkt i koden.

Om du till exempel vill skriva ut arbetsbladet som heter Blad 1 , använda:

ActiveWorkbook.Worksheets("Sheet1").PrintOut copies:=1

• Du kan också skriva ut från en arbetsbok som inte är aktiv. Om du till exempel vill skriva ut Blad 1 från en arbetsbok som heter Arbetsbok1 , använda:

Arbetsbok("Arbetsbok1").Arbetsblad("Blad1").PrintOut kopior:=1

• Här skriver vi bara ut en kopia av arbetsbladet. Om du vill skriva ut fler än en kopia ändrar du kopior egendom i enlighet med detta.
• Om du vill skriva ut flera arbetsblad och sammanställa dem när du skriver ut dem finns det också ett alternativ för dig. Utskrift funktion av VBA har en egenskap som heter Sammanställning . Ställ in den på följande sätt True .

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

Relaterat innehåll: Excel VBA: Hur du ställer in utskriftsområdet dynamiskt (7 sätt)

Liknande läsningar:

• Excel-knapp för att skriva ut specifika blad (med enkla steg)
• Hur man skriver ut horisontellt i Excel (4 metoder)
• Skriv ut flera Excel-blad till en enda PDF-fil med VBA (6 kriterier)
• Skriv ut titlar i Excel är inaktiverat, hur aktiverar du det?
• Hur man skriver ut Excel-ark i A4-storlek (4 sätt)

Steg 4: Kör VBA-koden för att skriva ut i Excel

Efter att ha angett VBA koden på rätt sätt, kör Makro genom att klicka på Kör i alternativet i VBA verktygsfältet.

Relaterat innehåll: Excel VBA: Ange utskriftsområde för flera områden (5 exempel)

Steg 5: Slutresultatet: Skriv ut med VBA

Om du lyckas skriva ner koden och köra den kommer du att se att arbetsbladet skrivs ut på skrivaren och att ett litet fönster visas så här.

Relaterat innehåll: Excel VBA: Skriv ut ett antal celler (5 enkla metoder)

Saker att komma ihåg

Här har vi använt Utskrift funktion av VBA Det finns en annan funktion i VBA kallas . PrintPreview som visar en förhandsgranskning av data före utskrift.

Syntaxen för PrintPreview funktionen är densamma som funktionen Utskrift funktion, använd bara PrintPrview i stället för Utskrift .

ActiveWorkbook.ActiveSheet.PrintPreview

Den visar förhandsgranskningen av arbetsbladet innan du skriver ut det.

Slutsats

Så här kan du skriva ut data från ett Excel-arbetsblad med den här metoden. VBA Om du har några frågor är du välkommen att ställa dem till oss. Glöm inte att besöka vår webbplats. ExcelWIKI för fler inlägg och uppdateringar.