Der übliche Prozess des Etikettendrucks aus Microsoft Excel beinhaltet das Zusammenführen von Tabellen mit Microsoft Word. Aber manche Leute ziehen es vor, alle Aufgaben innerhalb von Excel zu erledigen. Glücklicherweise gibt es eine Möglichkeit, die Etiketten in Excel zu drucken, ohne sich mit Word zu beschäftigen. Diese Anleitung wird sich darauf konzentrieren, wie man das erreicht.

Download Arbeitsbuch Praxis

Sie können die Arbeitsmappe mit dem Datensatz und dem für die Demonstration verwendeten Makro über den unten stehenden Link herunterladen und als Vorlage verwenden.

Etiketten ohne Word drucken.xlsm

Dies ist die Datei mit den druckbaren Etiketten.

Etiketten ohne Word drucken.pdf

Schritt-für-Schritt-Verfahren zum Drucken von Etiketten in Excel ohne Word

An Etiketten drucken direkt von Excel aus, ohne Microsoft Word zu verwenden, müssen wir nur die Excel-Tabelle mit der entsprechenden Etikettengröße ausdrucken. Wir können die Zellengröße so umwandeln, dass sie der Etikettengröße entspricht. Wir werden VBA-Code verwenden, um diese Aufgabe für uns zu erledigen.

Nehmen wir zunächst an, wir hätten den folgenden Datensatz.

Wir werden zunächst alle Daten in Etiketten umwandeln und sie dann in Excel ausdrucken, ohne die Hilfe von Word in Anspruch zu nehmen.

Um Microsoft Visual Basic for Applications (VBA) in Excel verwenden zu können, benötigen Sie zunächst die Entwickler Klicken Sie hier, um zu sehen, wie Sie die Registerkarte Entwickler in der Multifunktionsleiste anzeigen Sobald Sie das haben, folgen Sie den Schritten, die wir gezeigt haben, um diese Etiketten in Excel ohne Word zu drucken.

Schritt 1: Daten in ein neues Blatt kopieren

Die Auswahl des VBA-Codes kann hier nur richtig funktionieren, wenn die Zelleinträge ab Zelle A1 Wir müssen also zunächst unseren Datensatz, der alle Beschriftungen enthält, so anordnen. Falls Ihr Datensatz irgendwo anders als in einer Zelle beginnt A1 wie unsere, die mit der Zelle B5 Kopieren Sie sie zunächst in ein neues Tabellenblatt und fügen Sie sie ganz am Anfang ein. Es sollte etwa so aussehen.

Jetzt sollte es bereit sein, mit dem VBA-Code zu arbeiten.

Schritt 2: VBA-Code einfügen

Als Nächstes müssen wir den VBA-Code einfügen, um die Etiketten an die gewünschte Größe und Form anzupassen. So fügen Sie den VBA-Code ein.

• Gehen Sie zunächst zur Entwickler in der Multifunktionsleiste.
• Wählen Sie dann Visual Basic von der Code Gruppe.

• Daraufhin öffnet sich das VBA-Fenster. Wählen Sie nun die Option einfügen. und wählen Sie dort Modul aus dem Dropdown-Menü.

• Gehen Sie dann zum Modul und schreiben Sie den folgenden Code.

 Dieser Code erstellt Etiketten 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 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 Erläuterung

Dieser VBA-Code besteht aus zwei Teilen bzw. Unterpunkten - dem CreateLabel Sub und die AskForColumn Zunächst wird erklärt, was in der Unterseite AskForColumn vor sich geht, und anschließend wird die Funktionsweise des Codes in der Unterseite CreateLabel erläutert.

Teil 1:

Zum besseren Verständnis haben wir den Teil in verschiedene Abschnitte unterteilt, siehe die Abbildung am Ende der Diskussion.

👉 Abschnitt 1: Dieser Abschnitt deklariert den Namen der Unterseite AskForColumn .

👉 Abschnitt 2: In diesem Abschnitt haben wir drei Variablen deklariert: refrg, vrb und data.

👉 Abschnitt 3: In diesem Abschnitt haben wir Werte für refrg und data festgelegt.

👉 Abschnitt 4: An dieser Stelle zeigt der Code ein Eingabefeld auf dem Arbeitsblatt an.

👉 Abschnitt 5: In diesem Abschnitt wird ein Für Schleife wird für die im Eingabefeld eingegebene Zahl durchlaufen.

👉 Abschnitt 6: In diesem Abschnitt des Codes wird nun die Größe der Zellen geändert.

👉 Abschnitt 7: Schließlich wird in diesem Abschnitt der zusätzliche Inhalt gelöscht.

Teil 2:

Ähnlich wie im vorherigen Teil haben wir auch diesen Teil in verschiedene Abschnitte unterteilt. Folgen Sie der Abbildung am Ende der Diskussion für den visuellen Teil.

👉 Abschnitt 1: Dieser Teil des Codes deklariert den Unternamen Createlabels .

👉 Abschnitt 2: Dieser Befehl führt das vorherige Unterprogramm an dieser Stelle des Codes aus.

👉 Abschnitt 3: Dieser Teil formatiert jede Zelle mit Hilfe des VBA Zellen Eigentum.

Schritt 3: VBA-Code ausführen

Nachdem Sie den Code eingegeben haben, schließen Sie das VBA-Fenster. Um den Code nun auszuführen, gehen Sie wie folgt vor.

• Gehen Sie zunächst zur Entwickler in der Multifunktionsleiste.
• Zweitens: Wählen Sie Makros von der Code Gruppe.

• Jetzt im Makro Feld, wählen Sie Createlables unter dem Makro-Name .

• Klicken Sie dann auf ausführen. .
• Wählen Sie dann die Anzahl der gewünschten Spalten aus. Für die Demonstration wählen wir 3. Klicken Sie dann auf OK .

Das Arbeitsblatt sieht nun automatisch so aus.

Die Etiketten können nun in Excel gedruckt werden, ohne dass Word verwendet werden muss.

Lesen Sie mehr: Wie man Etiketten aus Excel in Word druckt (mit einfachen Schritten)

Schritt 4: Benutzerdefinierte Ränder festlegen

Um die Etiketten zu drucken, müssen wir die richtigen Ränder für die gedruckte Seite festlegen. Dazu sollten wir die richtige Größe so wählen, dass die Position der Etiketten nicht beeinträchtigt wird und keine Etiketten auf dem Blatt gefährdet werden. Um benutzerdefinierte Ränder festzulegen, gehen Sie folgendermaßen vor.

• Gehen Sie zunächst auf die Seite Layout der Seite in der Multifunktionsleiste.
• Wählen Sie dann die Seite einrichten Sie finden diese Schaltfläche unten rechts in jeder Gruppe.

• Infolgedessen ist die Seite einrichten Gehen Sie nun in das Feld Margen Registerkarte darin.
• Wählen Sie dann die gewünschten Randlängen für Ihre gedruckte Seite. Wir haben die folgenden ausgewählt.

• Sobald Sie fertig sind, klicken Sie auf OK .

Schritt 5: Skalierungsoptionen für den Druck auswählen

Auch für den Druck von Etiketten ist eine korrekte Skalierung wichtig. So wird die Seite beispielsweise so gedruckt, wie wir es bisher getan haben.

Was sicherlich nicht unser Ziel ist. Wir müssen also das Blatt auf eine Seite bringen. Um das zu erreichen...

• Rufen Sie zunächst die Druckvorschau auf, indem Sie auf Strg+P auf Ihrer Tastatur.
• Links unten in der Ansicht finden Sie Einstellungen Darunter finden Sie die Skalierung Optionen am Ende.

• Klicken Sie nun auf die Option Skalierung und wählen Sie Fit Sheet auf einer Seite aus dem Dropdown-Menü.

Zu diesem Zeitpunkt ist die Skalierung der Etiketten abgeschlossen.

Lesen Sie mehr: Drucken von Adressetiketten in Excel (2 schnelle Wege)

Schritt 6: Tabellenkalkulation drucken

Während Sie sich noch in der Druckvorschau befinden, klicken Sie auf Drucken oben links in der Ansicht.

Klicken Sie darauf, um alle Etiketten in Excel ohne Hilfe von Word zu drucken.

Dinge zum Merken

Bevor Sie den VBA-Code ausführen, stellen Sie sicher, dass alle Beschriftungen in der Zelle A1 .

👉 Wählen Sie vor dem Drucken den richtigen Rand und die richtige Skalierung, damit alle Etiketten auf die Seite passen, da sonst einige abgeschnitten werden könnten.

👉 VBA-Code-Aktionen sind unumkehrbar. Stellen Sie also sicher, dass Sie die notwendigen Daten gesichert haben, bevor Sie eine Aktion ausführen.

Schlussfolgerung

Dies waren die Schritte, die Sie befolgen müssen, um Etiketten in Excel zu drucken, ohne Microsoft Word zu verwenden oder zusammenzuführen. Ich hoffe, dass Sie nun in der Lage sind, Etiketten in Excel ohne Word zu drucken. Ich hoffe, Sie fanden diese Anleitung hilfreich und informativ. Wenn Sie Fragen oder Anregungen haben, lassen Sie es uns in den Kommentaren unten wissen.

Weitere Leitfäden wie diesen finden Sie unter Exceldemy.com .