✔ Ein Modul hat einen unzulässigen Typ

[Shakie]

Probier mal alles im gesamten Code "genauer" zu definieren, also mit einem vorangestellten Scripting. , vielleicht hilft das ja.
also so:

Private Sub zCopyFolders(SourceFolder As Scripting.Folder, _
DestPath As String, FSO As Scripting.FileSystemObject, _
ByVal CreateFiles As Boolean, ByVal Overwrite As Boolean)
 
Dim nDestFolder As Scripting.Folder
Dim nDestPath As String
Dim nSubFolder As Scripting.Folder
Dim nFile As Scripting.File
Dim nFileName As String
 
usw...

 

[PoNr]

WOW,
super vielen DANk, jetzt funktioniert es. Was für ein blödes PRoblem, darauf muss man mal kommen.

Vielen Dank
PoNr

 

[Shakie]

Also ganz ehrlich, ich hätte selber nicht gedacht, dass es so funktioniert ^^
Es war nur so eine Idee...Aber ist ja gut, wenn es jetzt geht!