Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Tabellenblattname mit Datum und Uhrzeit

Tabellenblattname mit Datum und Uhrzeit
Klaus
Hallo, meine großen Gurus!
Ich hab da wieder mal eine kurze Frage?
In einer VBA-Prozedur verwende ich den Befehl ActiveSheet.Name = Format(Date, "dd/mm/yy"), um eine Kopie der Originaltabelle mit dem aktuellen Datum wegzusichern.
Wenn ich dies, was zwar sehr selten vorkommt, 2 x täglich mache, habe ich ein Problem, und muss die bereits 1 x gespeicherte Sicherungstabelle vorher manuell entfernen.
Ich möchte daher den Befehl so erweitern, dass für den Tabellennamen sowohl das Datum als auch die Uhrzeit (h:mm:ss) vergeben werden.
Voraus 1000 Dank
Klaus
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
mit Now statt Date owT
07.07.2009 10:08:55
Matthias
das ist aber dann keine Kopie, oder?
07.07.2009 10:17:06
Matthias
Hallo
Du benennst ja das aktive Blatt nur um
ActiveSheet.Name = Format(Now, "dd/mm/yy hhmmss")
Zeitformat ohne Doppelpunkte
sonst gibts einen Fehler
Gruß matthias
AW: das ist aber dann keine Kopie, oder?
07.07.2009 11:11:49
Klaus
Dankeschön!
alles klar
übrigens, das ActiveSheet ist bereits eine Kopie
Klaus
Anzeige
AW: Tabellenblattname mit Datum und Uhrzeit
07.07.2009 10:17:17
Alex
Hallo Klaus!
ActiveSheet.Name = Format(Now, "dd/mm/yy hh-mm-ss")
oder länger
ActiveSheet.Name = Format(Date, "dd/mm/yy") & " " & Format(Time, "hh-mm-ss")
AW: Tabellenblattname mit Datum und Uhrzeit
07.07.2009 11:09:48
Klaus
Dankeschön
Klaus
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Tabellenblattname mit Datum und Uhrzeit in Excel


Schritt-für-Schritt-Anleitung

  1. Öffne den Visual Basic for Applications (VBA) Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge ein neues Modul hinzu:

    • Klicke auf Einfügen und wähle Modul.
  3. Gib den folgenden VBA-Code ein:

    Sub TabellennamenMitDatumUndUhrzeit()
       ActiveSheet.Name = Format(Now, "dd-mm-yy hh-mm-ss")
    End Sub
  4. Führe das Makro aus:

    • Drücke F5 oder gehe auf Ausführen -> Sub/UserForm ausführen, um den Tabellennamen zu ändern.

Mit diesem Befehl wird das aktive Tabellenblatt umbenannt, wobei sowohl das aktuelle Datum als auch die Uhrzeit im Format dd-mm-yy hh-mm-ss verwendet werden. Achte darauf, dass du im Zeitformat keine Doppelpunkte verwendest, da dies zu einem Fehler führt.


Häufige Fehler und Lösungen

  • Fehler: Ungültiger Name: Wenn du Doppelpunkte im Zeitformat verwendest, erhältst du einen Fehler. Stelle sicher, dass du Bindestriche oder andere zulässige Zeichen verwendest.

  • Fehler: Name bereits vorhanden: Wenn du das Makro mehrmals hintereinander ausführst, könnte ein Fehler auftreten, wenn der Tabellennamen bereits existiert. Um dies zu vermeiden, überprüfe zuerst, ob der Name bereits vorhanden.


Alternative Methoden

Eine alternative Methode, um den Tabellennamen mit Datum und Uhrzeit zu versehen, ist die Verwendung von Textkonkatenation:

Sub SicherungstabelleMitDatumUndUhrzeit()
    ActiveSheet.Name = Format(Date, "dd-mm-yy") & " " & Format(Time, "hh-mm-ss")
End Sub

Diese Methode ermöglicht es dir, das Datum und die Uhrzeit in einem anderen Format anzuzeigen und sollte ebenfalls ohne Doppelpunkte im Zeitformat verwendet werden.


Praktische Beispiele

Hier sind einige Beispiele, wie du das Datum in Excel mit Uhrzeit verwenden kannst:

  1. Kopieren und Umbenennen eines Blatts:

    Sub KopiereUndBenenneBlatt()
       Sheets("Originalblatt").Copy After:=Sheets(Sheets.Count)
       ActiveSheet.Name = Format(Now, "dd-mm-yy hh-mm-ss")
    End Sub
  2. Automatische Sicherungstabelle:

    Sub SicherungErstellen()
       ActiveSheet.Copy After:=Sheets(Sheets.Count)
       ActiveSheet.Name = "Sicherung_" & Format(Now, "dd-mm-yy hh-mm-ss")
    End Sub

Diese Beispiele zeigen, wie du effektiv mit Datums- und Uhrzeitformaten in Excel arbeiten kannst, um deine Sicherungstabellen zu organisieren.


Tipps für Profis

  • Verwende Kommentare: Kommentiere deinen VBA-Code, um zu erklären, was jeder Teil des Codes tut, besonders wenn du komplexere Makros schreibst.

  • Fehlerbehandlung: Implementiere Fehlerbehandlungsroutinen in deinem Code, um unerwartete Fehler abzufangen und Benutzer über Probleme zu informieren.

  • Sicherungskopien: Erstelle regelmäßig Sicherungskopien deiner Arbeitsmappen, insbesondere bevor du neue Makros ausführst.


FAQ: Häufige Fragen

1. Wie kann ich das Datum in Excel ohne Uhrzeit formatieren?
Du kannst einfach ActiveSheet.Name = Format(Date, "dd-mm-yy") verwenden, um nur das Datum im Tabellennamen zu verwenden.

2. Was passiert, wenn der Tabellennamen zu lang ist?
Excel erlaubt Tabellennamen mit maximal 31 Zeichen. Achte darauf, dies bei der Verwendung von Datum und Uhrzeit zu berücksichtigen, da der Name ansonsten nicht gültig ist.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige