expertenaustausch > microsoft.* > microsoft.access

Jürgen Meyer (11.04.2020, 16:51)
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 (12.04.2020, 23:59)
Am 11.04.2020 um 16:51 schrieb Jürgen Meyer:
[..]
> Dim colfiles
> Ist alles ok
> Als was muss colfiles deklariert werden?

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

Ulrich
Ähnliche Themen