Portal | Forenübersicht | Neues Thema | Suchen | FAQ | Registrieren | Login
Forum > Excel & VBA > Fragen zu Excel/VBA >
Hier kannst Du Fragen speziell zu Deinem Problem stellen
In diesem Board befinden sich 1681 Themen.
Die Beiträge bleiben immer erhalten.
Es wird moderiert von P@ulchen, RO_SCH, .
Seite 1 Neues Thema letztes Thema nächstes Thema Dieses Board durchsuchen Diesen Thread zu meinen persönlichen Favoriten hinzufügen Abonnieren Ohne Zitat Antworten Druckt alle Antworten dieses Themas


 ist offline   Antworten Zitatantwort Einzelbeitrag drucken Dieses Thema weiterempfehlen
Profil private Nachricht senden
14.5.2018 - 14:08 Uhr
Posts



Hallo zusammen,

Ich habe diesen Code, um die Namen von Unterordnern einzulesen, leider bekomme ich sobald ich mit set quelle arbeiten will einen -Index ausserhalb des gültigen Bereiches.
Hat jemand eine Lösung, ScriptingRuntime ist eingeschaltet.

####################
sub foldercopy()

Dim FsyObjekt as Object
Dim Quelle as Object

Set FsyObjekt = CreateObject("Scripting.FileSystemObject")
Set Quelle = ThisWorkbook.Path & "\" & ThisWorkbook.Worksheets("Kopf").Range("A1").Value
FsyObjekt.copyFolder Quelle, "C:\tmp"

End Sub

################################

Danke

 ist offline  : Antworten Zitatantwort Einzelbeitrag drucken Dieses Thema weiterempfehlen
Profil private Nachricht senden
14.5.2018 - 14:08 Uhr
Posts




 ist offline  : Antworten Zitatantwort Einzelbeitrag drucken Dieses Thema weiterempfehlen
Profil private Nachricht senden
14.5.2018 - 14:12 Uhr
Posts



ich bin schon völlig daneben,

ich will natürlich die eingelesenen Ordner kopieren.

 ist offline  Ordner kopieren: Antworten Zitatantwort Einzelbeitrag drucken Dieses Thema weiterempfehlen
Profil private Nachricht senden
15.5.2018 - 17:16 Uhr
Posts



Hi,

dann lass doch das Set vor Quelle einfach weg.
Du willst doch nur einen String in Quelle schreiben, und kein Object.

Gruß Roland

Seite 1 nach oben

Forenauswahl:





Numaek's Forum V4.1.0 © 2005 by numaek
Originaltemplate by numaek