Get Started

Barcodes in Excel erstellen – So einfach geht’s!

admin

·

·

Easy
Kurz

Level: Einsteiger

Dauer: Kurz

Tutorial im PDF-Format downloaden

In diesem Tutorial zeigen wir dir, wie du mithilfe von VBA Barcode-Labels in Excel erstellen kannst. Egal, ob du Produkte kennzeichnen möchtest oder einfach nur Barcodes für deine persönlichen Zwecke benötigst, mit diesem Tutorial wirst du lernen, wie du sie in Excel ganz einfach generieren kannst. Entdecke, wie du deine Daten in barcodefähige Formate umwandelst und diese in Excel für verschiedenste Anwendungen nutzt.

Anleitung: Barcodes in Excel erstellen

1. Einbinden der Barcode-Schriftart

  1. Du benötigst eine Barcode-Schriftart. Eine beliebte Schrift ist „3 of 9 Barcode“. Diese kannst du auf folgenden Seiten herunterladen:
  2. Installiere die Barcode-Schriftart

2. Variablen deklarieren und zuweisen

Deklariere die notwendigen Variablen

Dim barcodeValue As String
Dim barcodeFont As String

In der String-Variable barcodeValue speichern wir die Informationen ab, die im Barcode enthalten sein sollen (In diesem Beispiel stehen die Daten in Zelle „A1“). 

barcodeValue = Range("A1").Value

Die Variable barcodeFont benötigen wir, um die zuvor installierte Schriftart auszuwählen. In unserem Beispiel ist das die Schriftart „3 of 9 Barcode“.

barcodeFont = "3 of 9 Barcode"

3. Barcode-Schriftart anwenden

Wir wenden nun die festgelegte Barcode-Schriftart für die selektierte Zelle an und legen die Schriftgröße fest.

With Selection.Font
    .Name = barcodeFont
    .Size = 20 
End With

4. Barcode-Wert in Zelle schreiben

Als letzten Schritt schreiben wir den Wert für den Barcode in die selektierte Zelle. Außerdem passen wir die Spaltenbreite direkt mit an, damit der Barcode sichtbar ist.

Selection.Value = barcodeValue
Selection.EntireColumn.AutoFit

Trage jetzt einen Wert in die Zelle „A1“ ein und selektiere eine andere Zelle, in die der Barcode geschrieben werden soll. Die Funktion kannst du zum Beispiel auf einen Button legen, um sie auszuführen.

Excel Barcode erstellen

5. Vollständiger Programmcode

Hier der vollständige VBA Code:

Sub BarcodeErstellen()
    Dim barcodeValue As String
    Dim barcodeFont As String
    
    barcodeValue = Range("A1").value
    barcodeFont = "3 of 9 Barcode"
    
    With Selection.Font
        .Name = barcodeFont
        .Size = 20
    End With
    
    Selection.value = barcodeValue
    Selection.EntireColumn.AutoFit
End Sub

Fazit

Barcodes sind eine praktische Möglichkeit, um Informationen schnell und präzise zu erfassen und zu verarbeiten. Ob für den Einsatz in der Inventur, der Lagerverwaltung, dem Verkauf oder anderen Bereichen, das Hinzufügen von Barcodes zu deinen Excel-Daten kann die Effizienz und Genauigkeit deiner Arbeitsprozesse verbessern.

Denke daran, dass es verschiedene Barcode-Schriftarten gibt, aus denen du wählen kannst, je nach den Anforderungen deines Projekts. Du kannst auch weitere Funktionen hinzufügen, um den Barcode anzupassen oder automatisch zu generieren, abhängig von deinen spezifischen Bedürfnissen.

Projektdateien

Tutorial im PDF-Format

BarcodeGenerator.xlsm

admin