VBA Druckauftrag

Ich würde das so nicht machen, viel zu kompliziert.
<br />Mach ein separates Blatt und richte es so ein das es ein Etikett passend druckt.
<br />In einem 2ten Blatt machst Du einfach eine Liste aller Nummern in einer Spalte.
<br />Und nun schreibst Du Dir ein Makro welches in einer Schleife jede Nummer in die Zelle Deiner Druckvorlage schreibt und dieses ausdruckt. Ganz simpel.
<br />Andreas.
<br />Sub Test()
Dim Ws As Worksheet
Dim R As Range
Set Ws = Worksheets("Druckvorlage")
For Each R In Range("A1", Range("A" & Rows.Count).End(xlUp))
With Ws
.Range("A1") = R
.PrintOut
End With
Next
End Sub

<br />

Hallo,
<br />Erste Gedanken:
<br />Immer nach zwei Zeilen einen Seitenumbruch einfügen. Dann müsste jeder Barcode mit zugehörigem Text auf einem eigenen Etikett (ein Etikett entspricht dann einer Seite) ausgegeben werden.
<br />Alternativ könnte das Seitenformat in Excel auf die Etikettengröße eingestellt und entsprechende Ränder definiert werden. Dadurch könnten die auf ein Etikett passenden Zellen auf die gewünschten zwei Zellen beschränkt werden.
<br />Mit VBA sollte eine Lösung jedenfalls möglich sein ...
<br />Weitere Fragen/Gedanken:
<br />Welcher Barcode wird verwendet?
<br />Gibt es diesen auch als Schriftart?
<br />Wenn ja, dann könnte in der zweiten Zeile der Text eingegeben und in der ersten mit der Barcode-Schriftart dargestellt werden - es wären keine Bilder erforderlich.
<br />Von welcher Anzahl Etiketten sprechen wir hier?
<br />Welcher Drucker? Expliziter Etikettendrucker?
<br />Freundliche Grüße
<br />Gerhard
<br />

Alles klar, danke! Ich probiere es mal
<br />

Hallo,
<br />Druck von festgelegtem Bereich
<br />Mittels VBA vor dem Starten des Druckauftrags den Druckbereich bis zur ersten leeren Zelle festlegen, dann sollte nur der gewünschte Bereich gedruckt werden.
<br />Start des Scripts
<br />Der Start eines VBA-Scripts kann zum Beispiel mittels Änderung einer Zelle, Drücken eines eingefügten Buttons oder mittels Tastenkombination (via Macro) ausgelöst werden.
<br />Freundliche Grüße
<br />Gerhard
<br />

Es wird die Schriftart CCode39 verwendet.
<br />Die Etikettenanzahl ist immer unterschiedlich. Könnte man VBA so programmieren, dass sobald eine leere Zeile kommt, der Druckauftrag endet?
<br />Es handelt sich um einen speziellen Etikettendrucker, den ZEBRA ZT410
<br />