Office: (Office 2019) Komplexes Makro ohne Ahnung :-/

zu früh gefreut ... jetzt habe ich eine neue Zeile eingefügt und ausgefüllt - und bekomme bei F5 einen Laufzeitfehler 1004 und die gelbe Markierung. Woran kann das denn liegen?

 

Schau mal in die Zelle "L5". Aus dieser Zelle wird ein Teil des Dateinamens der 3 PDF-Dateien generiert. Da ist ein Slash drin enthalten. Dies ist ein für Dateinamen unzulässiges Zeichen. Das hatte ich dir schon in einem der vorherigen Threads geschrieben mit dem Vermerk auf eine saubere/störungsfreie Datenhaltung in den Tabellen.
Der Slash lässt sich problemlos in VBA erkennen und gegen ein anderes (zulässiges) Zeichen austauschen. Sinnvoll wäre z.B.: . - oder Leerzeichen
Was soll genommen werden.

Gruß Uwe

 

Da du die Sache in Ordnung gebracht hast, mein Vorschlag. Der Slash wird gegen ein Minuszeichen getauscht. Ändere den Teile der Codes ab With Tabelle1 bis (die 3 Zeilen) End With

Code:

    With Tabelle1
        arr = .Range(.Cells(.Cells(Rows.Count, 1).End(xlUp).Row, 1), .Cells(.Cells(Rows.Count, 1).End(xlUp).Row, 14)).Value
        arr(1, 12) = Replace(arr(1, 12), "/", "-", 1, 4)
    End With