A 2016 64 bit / Typen unverträglich

[Jürgen Meyer]

Dim fso As Object
Dim objfolder As Object
Dim objfile As Object
Dim colfiles As Collection
Dim strStartfolder As String

strStartfolder = "G:\Test\"
Set fso = CreateObject("Scripting.FileSystemObject")
Set objfolder = fso.GetFolder(strStartfolder)
Set colfiles = objfolder.Files

In der letzten Zeile erhalte ich die Meldung
Typen unverträglich

Sage ich einfach nur
Dim colfiles
Ist alles ok
Als was muss colfiles deklariert werden?

Gruß
Jürgen

[Ulrich Möller]

Wenn du Late Bindung verwendest, solltest die die Files Auflistung als
Object oder Variant definieren.

Ulrich