Hallo Benjae,
ich finde es, zurückhaltend ausgedrückt, ein bisschen verwunderlich, wenn ich neben dem Dank für die erste Version und einem neuen Versuch von Dir (- Bemerkungen dazu weiter unten) zu der letzten Version nur den knappen Satz lese:
Achja, deine neue Version läuft leider nicht bei mir. :-(
Wenn Du nicht den kleinsten Hinweis lieferst, was funktioniert und was nicht funktioniert (und vielleicht sogar warum?), was Du - je nachdem - unternommen hast, um den Fehler zu finden oder zumindest einzugrenzen, dann hat das 2 Dinge zur Folge: Es wird auch für mich sehr schwer, den Fehler bzw. die Ursache des Nichtfunktionierens zu finden und ich könnte außerdem den Eindruck gewinnen, dass Dir nicht so sehr viel daran liegt.
Immerhin habe ich alles nach bestem Wissen überprüft, eingeschlossen den Download-Link und ob die heruntergeladene Datei auch so funktioniert, wie ich sie erstellt habe. Nachdem ich diese Überprüfung eben noch einmal wiederholt habe, komme ich zu demselben Ergebnis: Bei mir funktioniert es wie erwartet (in Excel 2003, was aber eher keine Rolle spielt).
Da ich so viel wie möglich von dem ursprünglichen Code beibehalten habe, obwohl ich verschiedene Dinge anders machen würde, insgesamt also nur die minimal nötigen Änderungen im Sinne der Anforderung vorgenommen habe, kann ich mir auch nicht erklären, warum plötzlich "gar nichts mehr" funktionieren soll.
Deshalb folgender Vorschlag: Für den Fall, dass die hochgeladene Datei beschädigt sein sollte oder nicht einwandfrei wieder heruntergeladen werden kann, lade ich sie neu hoch. (Bei dieser Gelegenheit bereinige ich vorher noch das Tabellenblatt "Configuration" und lösche ein von mir für Testzwecke eingefügtes Tabellenblatt "InchesToPoints", was ich zwar vergessen hatte, was aber die Funktionstüchtigkeit nicht beeinflusst.)
www.file-upload.net/download-2083673/SN2288959_CID_Barcode_bis_5002.xls.html
Und bitte Dich, es mit dieser Version noch einmal zu versuchen.
__________________________________________________
" ... bin ich jetzt zu einem passablen Ergebnis gekommen,
es gibt nur noch ein paar Schöheitsfehler.
...
Meinst du das es noch eine bessere Lösung gibt als diese ..."
Ich meine ja. Denn es ist sicherlich nicht die allerbeste Lösung, nicht benötigte Zeilen erst zu erstellen und anschließend wieder zu löschen. Das war mein Ansatz in AW9, ich bin am Montag nur nicht mehr dazu gekommen, es auch zu tun.
... und auf die Schnelle schaffe ich das jetzt auch nicht mehr. Um die zwei leeren Zeilen (3, 4, 7, 8, 11, 12, ...) nicht zu erstellen, müsste ich mir den VBA-Code noch mal genau ansehen, vielleicht morgen vormittag.
Da man andererseits überflüssige Zeilen löschen und Seitenränder und Zeilenhöhen auch anders setzen kann als mit VBA, nämlich über Menübefehle u. a., hatte ich für ein VBA-freies Ausprobieren der richtigen Werte vorgeschlagen:
Wenn Du die Zeit nutzen willst, dann erstelle Dir mit der jetzigen Version 40 Barcodes, lösche die überflüssigen Zeilen raus, passe die Seitenränder an ... und taste Dich dann heran, wie die Barcode-Höhe verändert werden muss, damit alle 10 Barcode-Zeilen gut auf ein A4H-Blatt passen.
Das war also nur eine "befristete Zwischenlösung" für Montagabend bis Dienstagmittag. Die letzte Version erstellt genau die Paare von Zeilen (Barcode + SID), die nötig und gewünscht sind, passt die Seitenränder, Formatierung und Ausrichtung in VBA an und erfüllt die Vorgaben (10 x 4 x 2,54 cm x 4,85 cm) bis auf wenige Hundertstel Millimeter.
Deshalb bin ich dafür, es mit dieser Version noch einmal zu versuchen. Falls wieder etwas nicht funktioniert, bitte möglichst genau angeben, was?
MfG Charlotte
