Thema Datum  Von Nutzer Rating
Antwort
Rot Ordner aus Excel anlegen
02.02.2021 13:58:43 SDriesner
NotSolved
02.02.2021 15:02:10 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
SDriesner
Datum:
02.02.2021 13:58:43
Views:
370
Rating: Antwort:
  Ja
Thema:
Ordner aus Excel anlegen

Hallo zusammen,

ich finde den Fehler nicht...

Sub Schaltfläche2_Klicken()
Dim i As Long
Dim strMain As String

strMain = Cells(1, 6)

On Error GoTo knPfad

ChDir (strMain)
i = 8
Do While Cells(i, 2) <> ""
On Error Resume Next
    MkDir (strMain & Cells(i, 6))
    MkDir (strMain & Cells(i, 6) & "\" & Cells(i, 7))
    'ActiveSheet.Hyperlinks.Add Anchor:=Cells(i, 7), Address:= _
        'strMain & Cells(i, 6) & "\" & Cells(i, 7)
    i = i + 1
Loop
Exit Sub
knPfad:
MsgBox strMain & " gibt es nicht"
End Sub

In der Zelle 1,6 ist der Dateipfad und unter diesem soll ein Ordner angelegt werden sowie ein Unterordner...

Ordner 1 klappt Ordner 2 nicht...

zu erwähnen wäre noch das ich diese Ordner auf einem OneDrive anlegen möchte. Kann mir dabei einer helfen?

 

MFG SD

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Ordner aus Excel anlegen
02.02.2021 13:58:43 SDriesner
NotSolved
02.02.2021 15:02:10 ralf_b
NotSolved