Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Folder mit heutigem Datum erstellen

Folder mit heutigem Datum erstellen
28.10.2004 13:30:58
Lisa
Hallo Experten
Da Ihr mir schon so oft geholfen habt, möchte
ich mich erst mal ganz doll bedanken und habe
leider schon wieder ein Problem, bei dem ich
Eure Hilfe brauche.
Ich suchen einen Code, bei dem es einen neuen
Folder mit dem aktuellen Datum anlegt und die
Datei dort rein speichert.
Ich habe einen Folder der Test heisst und
in den rein sollen die Folder mit dem Tagesdatum
erstellt werden.
Glaube irgendwas mit mkdir sollte es wohl sein.
Hoffe, jemand kann mir nen Ansatz geben.
Liebe Grüsse Lisa
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Folder mit heutigem Datum erstellen
Uduuh
Hallo,
If Dir("c:\Test\" & Format(Date, "YYYYMMDD"), vbDirectory) = "" Then
MkDir "c:\Test\" & Format(Date, "YYYYMMDD")
End If
Gruß aus'm Pott
Udo
AW: Danke m.T.
Lisa
Hallo Udo
Danke Dir, das wars.
Gruss Lisa
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Folder mit heutigem Datum erstellen


Schritt-für-Schritt-Anleitung

Um einen neuen Folder mit dem heutigem Datum in Excel zu erstellen, kannst Du den folgenden VBA-Code verwenden. Dieser Code überprüft zuerst, ob der Ordner bereits existiert, und erstellt ihn nur, wenn dies nicht der Fall ist.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und dann auf Modul, um ein neues Modul zu erstellen.

  3. Füge den folgenden Code in das Modul ein:

    Sub FolderMitHeutigemDatumErstellen()
       Dim folderPath As String
       folderPath = "C:\Test\" & Format(Date, "YYYYMMDD")
    
       If Dir(folderPath, vbDirectory) = "" Then
           MkDir folderPath
       End If
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Führe das Makro aus, um einen neuen Folder mit dem heutigem Datum zu erstellen.

Der Ordner wird im Format YYYYMMDD erstellt, also z.B. 20231010 für den 10. Oktober 2023.


Häufige Fehler und Lösungen

  • Fehler: "Pfad nicht gefunden"

    • Stelle sicher, dass der übergeordnete Ordner (C:\Test\) bereits existiert. Wenn nicht, erstelle diesen Ordner manuell oder passe den Code entsprechend an.
  • Fehler: "Zugriff verweigert"

    • Überprüfe, ob Du die erforderlichen Berechtigungen hast, um im angegebenen Verzeichnis zu schreiben. Möglicherweise musst Du Excel als Administrator ausführen.

Alternative Methoden

Wenn Du keine VBA-Programmierung verwenden möchtest, kannst Du auch manuell einen Folder mit dem heutigem Datum erstellen:

  1. Öffne den Windows Explorer.
  2. Navigiere zu dem Ordner, in dem Du den neuen Folder erstellen möchtest.
  3. Klicke mit der rechten Maustaste und wähle Neuer Ordner.
  4. Benenne den Ordner mit dem heutigen Datum im Format JJJJMMDD.

Praktische Beispiele

Hier ist ein praktisches Beispiel, wie Du den Code anpassen könntest, um den Ordner an einem anderen Speicherort zu erstellen:

Sub FolderMitHeutigemDatumErstellen()
    Dim folderPath As String
    folderPath = "D:\MeinOrdner\" & Format(Date, "YYYYMMDD")

    If Dir(folderPath, vbDirectory) = "" Then
        MkDir folderPath
    End If
End Sub

In diesem Beispiel wird der Folder im Laufwerk D: erstellt. Du kannst den Speicherort jederzeit anpassen.


Tipps für Profis

  • Nutze die Now-Funktion, um auch die Uhrzeit in den Ordnernamen einzufügen, falls Du mehrere Ordner am selben Tag erstellen möchtest.
  • Erstelle eine Excel-Historie, indem Du den Ordnernamen so anpasst, dass er neben dem Datum auch eine Beschreibung oder eine Versionsnummer enthält.

FAQ: Häufige Fragen

1. Wie kann ich den Ordnernamen anpassen?
Du kannst den folderPath-String im Code ändern, um zusätzliche Informationen wie einen Projektnamen hinzuzufügen.

2. Ist dieser Code in allen Excel-Versionen kompatibel?
Ja, der VBA-Code ist in den meisten modernen Excel-Versionen (ab Excel 2007) funktionsfähig.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige