Het gebruikelijke proces voor het afdrukken van etiketten vanuit Microsoft Excel bestaat uit het samenvoegen van spreadsheets met Microsoft Word. Maar sommige mensen geven er de voorkeur aan om alle taken binnen Excel uit te voeren. Gelukkig is er een manier om de etiketten in Excel af te drukken zonder tussenkomst van Word. Deze zelfstudie gaat over hoe u dat kunt doen.

Download Praktijk Werkboek

U kunt de werkmap met de dataset en de voor de demonstratie gebruikte macro downloaden van de onderstaande link en als sjabloon gebruiken.

Etiketten afdrukken zonder Word.xlsm

Dit is het bestand met afdrukbare etiketten.

Etiketten afdrukken zonder Word.pdf

Stap voor stap procedure om etiketten af te drukken in Excel zonder Word

Naar etiketten afdrukken rechtstreeks vanuit Excel, zonder Microsoft Word te gebruiken, hoeven we alleen de Excel-spreadsheet af te drukken met de juiste labelgrootte. We kunnen de celgrootte aanpassen aan de labelgrootte. We gaan VBA-code gebruiken om de taak voor ons uit te voeren.

Laten we eerst aannemen dat we de volgende dataset hebben.

We gaan eerst alle gegevens omzetten in etiketten en ze dan afdrukken in Excel zonder hulp van Word.

Om Microsoft Visual Basic for Applications (VBA) in Excel te kunnen gebruiken, moet u eerst de Ontwikkelaar tabblad op uw lint. Klik hier om te zien hoe u kunt toon het tabblad Ontwikkelaar op uw lint Zodra u dat hebt, blijft u de stappen volgen die we hebben gedemonstreerd om deze etiketten af te drukken in Excel zonder Word.

Stap 1: Kopieer gegevens naar nieuw blad

De selectie van de VBA-code kan hier alleen goed werken als de celinvoer begint bij cel A1 We moeten dus eerst onze dataset met alle labels zo rangschikken. Als je dataset ergens anders begint dan in cel A1 zoals de onze, die begon bij cel B5 kopieer ze eerst naar een nieuwe spreadsheet en zet ze helemaal aan het begin. Het moet er ongeveer zo uitzien.

Nu zou het klaar moeten zijn om met de VBA-code te werken.

Stap 2: VBA-code invoegen

Vervolgens moeten we de VBA-code invoegen om de labels aan te passen aan de gewenste grootte en vorm. Om VBA-code in te voegen-

• Ga eerst naar de Ontwikkelaars tabblad op je lint.
• Selecteer vervolgens Visual Basic van de Code groep.

• Als gevolg daarvan opent het VBA-venster. Selecteer nu de Plaats en selecteer Module uit het drop-down menu.

• Ga daarna naar de module en schrijf de volgende code op.

 'Deze code maakt labels in Excel Sub Createlabels() Application.Run "AskForColumn" Cells.Select Selection.RowHeight = 75.75 Selection.ColumnWidth = 34.14 With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With Selection.HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With End Sub Sub AskForColumn() Dim refrg As Range Dim vrb As Long Dim dat As Long Set refrg = Cells(Rows.Count, 1).End(xlUp) dat = 1 On Error Resume Next incolno = InputBox("Enter Number ofColumns Desired") For vrb = 1 To refrg.Row Step incolno Cells(dat, "A").Resize(1, incolno).Value = _ Application.Transpose(Cells(vrb, "A").Resize(incolno, 1)) dat = dat + 1 Next Range(Cells(dat, "A"), Cells(refrg.Row, "A")).ClearContents End Sub 

🔎 Code Uitleg

Er zijn twee delen of subs in deze VBA-code- de CreateLabel sub en de AskForColumn sub. Eerst gaan we uitleggen wat er gebeurt in de AskForColumn sub en daarna gaan we naar de CreateLabel sub om uit te leggen hoe de code werkt.

Deel 1:

Voor een beter begrip hebben wij het gedeelte in verschillende secties verdeeld. Kijk naar de figuur aan het eind van de bespreking.

👉 Sectie 1: Deze sectie verklaart de naam van de sub AskForColumn .

👉 Sectie 2: Wij hebben deze sectie gebruikt om drie variabelen aan te geven: refrg, vrb en data.

👉 Sectie 3: In dit deel hebben wij waarden ingesteld voor refrg en data.

👉 Sectie 4: Op dit punt toont de code een invoervak op de spreadsheet.

👉 Sectie 5: In deze afdeling wordt een Voor lus wordt uitgevoerd voor het in het invoerveld ingevoerde getal.

👉 Sectie 6: Dit deel van de code wijzigt nu de grootte van de cellen.

👉 Sectie 7: Tenslotte ruimt dit deel de extra inhoud op.

Deel 2:

Zoals in het vorige deel hebben wij ook dit deel in verschillende secties verdeeld. Volg de figuur aan het eind van de bespreking voor het visuele deel.

👉 Sectie 1: Dit deel van de code verklaart de subnaam Createlabels .

👉 Sectie 2: Dit commando voert de vorige sub uit op dit punt van de code.

👉 Sectie 3: Dit gedeelte formatteert elke cel met behulp van de VBA Cellen eigendom.

Stap 3: VBA-code uitvoeren

Zodra u de code hebt ingevoerd, sluit u het VBA-venster. Om de code nu uit te voeren volgt u deze stappen.

• Ga eerst naar de Ontwikkelaar tabblad op je lint.
• Ten tweede, selecteer Macro's van de Code groep.

• Nu in de Macro vak, selecteer Createlables onder de Macro naam .

• Klik dan op Ren .
• Selecteer vervolgens het aantal kolommen dat u wenst. Wij selecteren 3 voor de demonstratie. Klik vervolgens op OK .

De spreadsheet ziet er nu automatisch zo uit.

De etiketten zijn nu klaar om af te drukken in Excel, zonder gebruik van Word.

Lees meer: Etiketten afdrukken vanuit Excel in Word (in eenvoudige stappen)

Stap 4: Aangepaste marges instellen

Om de etiketten af te drukken, moeten we de juiste marges instellen voor de afgedrukte pagina. Daarvoor moeten we het juiste formaat kiezen, zodanig dat het de positie van de etiketten niet beïnvloedt en geen etiketten op het vel in gevaar brengt. Volg deze stappen om aangepaste marges in te stellen.

• Ga eerst naar de Pagina-indeling tabblad op je lint.
• Selecteer vervolgens de Pagina instelling knop zoals in de figuur. U vindt hem rechtsonder in elke groep.

• Als gevolg daarvan zijn de Pagina instelling box zal verschijnen. Ga nu naar de Marges tabblad erin.
• Selecteer vervolgens de gewenste margetijden voor uw afgedrukte pagina. Wij hebben de volgende gekozen.

• Zodra u klaar bent, klikt u op OK .

Stap 5: Selecteer schaalopties voor afdrukken

De juiste schaling is ook belangrijk voor het afdrukken van etiketten. Bijvoorbeeld, wat we tot nu toe hebben gedaan zal de pagina als volgt afdrukken.

Wat zeker niet ons doel is. Dus moeten we het blad op één pagina passen. Om dat te doen...

• Ga eerst naar het afdrukvoorbeeld door op Ctrl+P op je toetsenbord.
• Linksonder in de weergave vindt u Instellingen Daaronder vindt u de Schalen opties aan het einde.

• Klik nu op de schaaloptie en selecteer Pasblad op één pagina uit het drop-down menu.

De schaalverdeling voor de etiketten is nu klaar.

Lees meer: Adreslabels afdrukken in Excel (2 snelle manieren)

Stap 6: Spreadsheet afdrukken

Terwijl u nog in het afdrukvoorbeeldscherm bent, klikt u op Afdrukken linksboven in het beeld.

Klik erop en dit zal alle etiketten in Excel afdrukken zonder hulp van Word.

Dingen om te onthouden

👉 Voordat u de VBA-code uitvoert, moet u ervoor zorgen dat al uw labels beginnen bij cel A1 .

👉 Kies voor het afdrukken de juiste marge en schaling, zodat alle etiketten op de pagina passen. Anders kunnen sommige etiketten worden afgesneden.

👉 VBA-code-acties zijn onomkeerbaar. Zorg er dus voor dat je een back-up hebt van je benodigde gegevens voordat je er een uitvoert.

Conclusie

Dit waren de te volgen stappen om etiketten af te drukken in Excel zonder Microsoft Word te gebruiken of samen te voegen. Hopelijk bent u nu in staat om etiketten af te drukken in Excel zonder Word. Ik hoop dat u deze gids nuttig en informatief vond. Als u vragen of suggesties hebt, laat het ons weten in de opmerkingen hieronder.

Voor meer gidsen als deze, bezoek Exceldemy.com .