Datum einfügen per Doppelklick

Forumthread: Datum einfügen per Doppelklick

29.06.2004 14:35:29

Stefan

Hi Leute und Spezis,
habe mal eine Frage hat einer eine Idee wie ich per doppelklick das Heuteig Datum in eine Zelle einfüge. Möchte dies gerne bei einer Arbeitsanwesenheitslist benutzen. Dies soll in der Spalte B komplett sein.
Hoffe einer von Euch kann mir helfen.
Gruß Stefan

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Datum einfügen per Doppelklick

andreas
Danke Andy

Stefan

AW: Datum einfügen per Doppelklick

andreas

hallo,
versuchs mal so


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 2 Then
ActiveCell.Value = Date
End If
End Sub

gruß
andreas e

http://www.fachforen.de
eine Linksammlung zu diversen fachforen

Danke Andy

Stefan

Klappt super so sollte es sein Danke dir.
Gruß Stefan

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um das heutige Datum per Doppelklick in eine Zelle einzufügen, kannst du den folgenden VBA-Code verwenden. Dieser wird in das entsprechende Arbeitsblatt eingefügt:

Öffne Excel und drücke Alt + F11, um den VBA-Editor zu öffnen.
Wähle das Arbeitsblatt aus, in das du den Code einfügen möchtest.

Kopiere den folgenden Code und füge ihn in das Codefenster ein:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 2 Then
   ActiveCell.Value = Date
   Cancel = True
End If
End Sub

Schließe den VBA-Editor und gehe zurück zu deiner Excel-Datei.
Doppelklicke auf eine Zelle in Spalte B, um das heutige Datum einzufügen.

Jetzt kannst du einfach durch Doppelklick in der Spalte B das aktuelle Datum einfügen – ideal für eine Arbeitsanwesenheitsliste!

Häufige Fehler und Lösungen

Fehler: Der Doppelklick fügt kein Datum ein.
- Lösung: Stelle sicher, dass der VBA-Code korrekt im richtigen Arbeitsblatt eingefügt wurde. Kontrolliere auch, ob die Makros in Excel aktiviert sind.
Fehler: Das Datum wird in die falsche Zelle eingefügt.
- Lösung: Überprüfe, dass der Code auf die richtige Spalte (in diesem Fall Spalte B) eingestellt ist. Du kannst die Zahl in If Target.Column = 2 anpassen, um eine andere Spalte zu verwenden.

Alternative Methoden

Es gibt auch andere Möglichkeiten, um ein Datumsfeld in Excel einzufügen:

Formel verwenden: Du kannst die Formel =HEUTE() in eine Zelle einfügen, um das aktuelle Datum anzuzeigen. Diese Methode aktualisiert sich jedoch jeden Tag.
Datenbereich oder Dropdown: Nutze die Funktion "Datenüberprüfung", um ein Dropdown-Menü für das Datum zu erstellen, was eine Excel Datumsauswahl ermöglicht.

Praktische Beispiele

Wenn du eine Arbeitsanwesenheitsliste führst, kannst du den Doppelklick-Mechanismus in Spalte B verwenden, um das aktuelle Datum für jeden Eintrag schnell einzufügen.
Für monatliche Berichte könntest du den VBA-Code anpassen, um das Druckdatum in Excel einzufügen. Ändere einfach die Date-Funktion in Now für das aktuelle Datum und die Uhrzeit.

Tipps für Profis

Du kannst den Code erweitern, um verschiedene Datumsformate zu unterstützen. Zum Beispiel:
```
ActiveCell.Value = Format(Date, "dd.mm.yyyy")
```
Experimentiere mit zusätzlichen Bedingungen, um beispielsweise das Datum nur einzufügen, wenn die Zelle leer ist.

FAQ: Häufige Fragen

1. Frage
Wie kann ich das Datum in einem anderen Format einfügen?
Antwort: Ändere den Code, indem du die Format-Funktion verwendest, um das gewünschte Datumsformat festzulegen.

2. Frage
Ist es möglich, das Datum automatisch bei jedem Doppelklick zu aktualisieren?
Antwort: Ja, du könntest den Code anpassen, um das aktuelle Datum jedes Mal neu einzufügen, wenn du auf die Zelle doppelklickst.

Beliebteste Forumthreads (12 Monate)