Workbooks.Open mit Unicode-Zeichen im Dateinamen

Forumthread: Workbooks.Open mit Unicode-Zeichen im Dateinamen
3 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Workbooks.Open mit Unicode-Zeichen im Dateinamen

19.08.2025 12:44:38

daniel

Hallo

ich habe gerade festgestellt, dass Workbooks.Open ein Problem hat, wenn im Dateinamen ein Zeichen vorkommt, dass nicht mehr zum 8-bit-Zeichensatz gehört( im konkreten Fall war es ein ł mit dem ASCII-Code dezimal 322) und mit Fehlermeldung abbricht.

gibt es dafür neben dem Umbenennen der Datei eine Lösung?
schließlich scheinen dieses Zeichen für Windows inzwischen im Dateinamen zulässig zu sein, der normale Umgang mit der Datei funktioniert ja, lediglich das Workbooks.Open gibt den Fehler aus.

Gruß Daniel

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Workbooks.Open mit Unicode-Zeichen im Dateinamen

19.08.2025 13:40:50

Ulf
AW: Workbooks.Open mit Unicode-Zeichen im Dateinamen

19.08.2025 14:39:03

daniel
AW: Workbooks.Open mit Unicode-Zeichen im Dateinamen

19.08.2025 15:02:23

daniel

AW: Workbooks.Open mit Unicode-Zeichen im Dateinamen

19.08.2025 13:40:50

Ulf

Hi,
habe getestet mit

Option Explicit



Public xlApp As Excel.Application

Public wb As Workbook

Public wks As Worksheet

Public strWB As String



Public Sub extra()

    strWB = "DATEI " & ChrW(322) & " .xls"

    Set xlApp = Application

    xlApp.Workbooks.Add.SaveAs strWB

    ActiveWorkbook.Close False

    Set wb = xlApp.Workbooks.Open(strWB)

    Debug.Print wb.Worksheets.Count

End Sub

und konnte das nicht nachvollziehen. Kann aber am Dateisystem liegen, evtl FAT32 oder exFAT u.ä. ?
hth
Ulf

AW: Workbooks.Open mit Unicode-Zeichen im Dateinamen

19.08.2025 14:39:03

daniel

Stimmt da hast du recht.
Workbooks.Open funktioniert.

der Fehler passiert vorher.
ich lese mit der DIR-Funktion aus, welche Dateien in einem bestimmten Verzeichnis liegen und öffne dann diese, wenn der der Dateiname gewissen Regeln entspricht.
Es ist dir DIR-Funktion, welche den Dateinamen falsch ausliest und aus dem ł (322) ein l (108) macht. Damit funktioniert das Öffnen natürlich nicht.

dh jetzt stellt sich die gleiche Frage mit DIR:
gibt es Alternativen zur DIR-Funktion, um die Dateien im Verzeichnis zu ermitteln und für die weitere Verarbeitung zu öffnen?

Gruß Daniel

AW: Workbooks.Open mit Unicode-Zeichen im Dateinamen

19.08.2025 15:02:23

daniel

Ok, hab mal recherchiert.
ChatGpt schlägt vor, das FileSystemObject zu verwenden.
werde ich mal testen.

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!