Polskie znaki w pobieranych nazwach plików - VBA for Aplication

Proszę o pomoc w rozgryzieniu problemu z odczytem nazw plików.

Napisałem makro, które pobiera nazwy plików z katalogów i wstawia do ListBox.
Problem polega na tym, że na niektórych komputerach odczytuje nazwy bez ogonków (np. ż zamienia na z itd.)
Klikając w nazwy na ListBox makro wywala się bo klikam na np. "zolc.jpg", a jest naprawdę "żółć.jpg"

Krótki fragment kodu, który działa ale nie na każdym kompie problem jest głównie na Win10

        sFile = Dir(sciezka & nazwakatalogu(m) & "\")
        Do Until sFile = vbNullString
            j = 1 + j
            Debug.Print sFile
            sFile = Dir()
                                   
                 .AddItem sciezka & nazwakatalogu(m) & "\" & sFile

Nadmieniam, że w systemie już wszędzie mam język PL.

Pozdrawiam
Andrzej