Thema Datum  Von Nutzer Rating
Antwort
Rot Pfad
04.05.2022 10:22:20 Thomas
NotSolved
04.05.2022 16:50:20 ralf_b
NotSolved
04.05.2022 21:10:06 Gast01287
NotSolved
09.05.2022 15:13:57 Thomas
NotSolved
09.05.2022 20:46:11 r
NotSolved

Ansicht des Beitrags:
Von:
Thomas
Datum:
04.05.2022 10:22:20
Views:
723
Rating: Antwort:
  Ja
Thema:
Pfad

Hallo zusammen

Der beiliegende code Funktioniert soweit wie er muss. Nun möchte ich aber den Pfad in Zelle C1 eintragen. Die Ordner sollen in diesen Pfad abgelegt werden. Leider krieg ich das nicht hin. Könnt ihr mir da weiter helfen?

Sub x()
  Dim i As Integer
  Dim sPfad As String
      
  For i = 3 To 20
    sPfad = Cells(i, 1).Value & "" & Cells(i, 2).Value & "" & Cells(i, 3).Value
    If Cells(i, 1) <> "" Then MkDir "E:\05_Programmierung\VBA\Datei erstellen aus excel\" & sPfad
  Next

End Sub
 


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 Pfad
04.05.2022 10:22:20 Thomas
NotSolved
04.05.2022 16:50:20 ralf_b
NotSolved
04.05.2022 21:10:06 Gast01287
NotSolved
09.05.2022 15:13:57 Thomas
NotSolved
09.05.2022 20:46:11 r
NotSolved