Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1604to1608
1604to1608
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datum per doppelklick

Forumthread: Datum per doppelklick

Datum per doppelklick
24.01.2018 09:29:57
MaBlu
Hallo ich habe ein VBA das geht tipptop, wenn aber die Zelle eine Verbundene Zelle ist geht es nicht mehr (Zellen sind verbunden wegen der länge des Datums), was könnte ich hier ändern dass es geht, sowohl verbunden als auch einzeln.
Z.B. J19 und K19 
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$J$19" Then
Target = Date
Cancel = True
End If
End Sub

Gruss MaBlu
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Datum per doppelklick
24.01.2018 09:33:26
Bernd
Hi,
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Offset(0, 0).Address(False, False) = "J19" Then
Target = Date
Cancel = True
End If
End Sub
MfG Bernd
AW: Datum per doppelklick
24.01.2018 09:42:37
MaBlu
Hallo Bernd
Klappt super danke.
Gruss MaBlu
Anzeige
Gerne und Danke für die Rückmeldung - owT
24.01.2018 09:50:02
Bernd
If Target(1).Address = "$J$19" Then owT
24.01.2018 13:13:33
Rudi
AW: If Target(1).Address = "$J$19" Then owT
24.01.2018 17:49:15
MaBlu
Hallo Rudi Maintaire
auch diese Lösung klappt besten Dank
MaBlu
Anzeige
;

Forumthreads zu verwandten Themen

Datum per Kalender in versch. Excel Versionen
Robert

Hallo Leute,
ich schnipple an einem Formular welches durch unseren Billardverband an verschiedene Leute verteilt wird. Diese verwenden auch versch. Excel versionen - 2000 setzen wir mindestens voraus!
Problem: Das Datum soll per Kalendertsteuerelement ausgewählt und eingefügt werden - a...
29.09.2008 11:10:08
Thread-ID: 1013045
5 Beiträge
datum per Makro
Chris

Hallo,
Wie kann ich per Makro für eine Arbeitswoche von Montag bis Samstag das Datum nur dieser Beiden Tage anzeigen lassen? Also für den kommenden Montag: 19.9.2011 - 24.9.11, dann bei Klick 26.9.-01.10
Die Aktualisierung per Klick sollte jeder Zeit möglich sein.
Hat da jmd einen...
15.09.2011 18:31:00
Thread-ID: 1230069
5 Beiträge
Anzeige
Datum per VBA
heike

Hallo,
in meiner Tabelle möchte ich, wenn in Spalte B1 etwas eingetragen wird, automatisch in A1 Datum/Urzeit eingetragen wird. Dank der Recherche hier, habe ich auch das passende gefunden. Private Sub Worksheet_SelectionChange(ByVal Target As Range) If IsEmpty(Range("A1")) And IsEmpty(Rang...
17.09.2011 19:33:29
Thread-ID: 1230340
6 Beiträge
Datum per Button übernehmen.
Julia

Schönen guten Abend,
ich bräuchte dringend Hilfe und finde im Internet nicht die passende Lösung, weil ich mich nicht gut in VBA auskenne. Ich will in VBA einen Button erstellen und beim betätigen soll das aktuelle Datum in der darunterliegenden Zeile eingetragen werden. Ich hoffe Ihr könnt...
10.10.2011 23:53:39
Thread-ID: 1233293
4 Beiträge
Datum per InputBox erhöhenß
Selma

Hallo Leute,
ich möchte in der aktive Zelle z.B. G3 über InputBox ein Datum z.B. 07.01.2013 eintragen, dann soll in nächsten vier Zellen (nach rechts gesehen) das Datum um ein Tag erhöht werden.
Danach eine Zelle (steht für Samstag und Sonntag) überspringen und in nächste Zelle sprich M...
07.05.2013 11:39:31
Thread-ID: 1311989
8 Beiträge
Datum per VBA kopieren
Manfred

Hallo,
wie bekomme ich folgendes per VBA hin:
Ich gebe in der Spalte B ein Datum (tt.mm.jjjj) ein, wenn dieses Datum eingegeben ist, soll dieses in die zelle nach links (Spalte A) kopiert und mit der Formatierung jjjjmmyy eingefügt werden.
Gruß
Mani
30.09.2013 13:10:20
Thread-ID: 1332648
5 Beiträge
Datum per VBA in drei ComoBoxen aufteilen
Andreas

Hallo,
ich möchte gerne ein Datum aus einer Zelle per Makro auf drei ComboBoxen aufteilen:
ComboBox2= Tag
ComboBox3 = Monat
ComboBox4 = Jahr
Mit meinem jetzigen Makro bekomme ich nur das komplette Datum in eine ComboBox.
ComboBox2 = Cells(ComboBox1.ListIndex + 4, 17)
...
20.10.2014 22:40:23
Thread-ID: 1387643
8 Beiträge
Datum per formel
siggi

Hallo
Kann mir jemand helfen?
In A2 schreibe ich "KW 35"rein.
Wie kann ich in B3 automatisch die 24.8 und in C3 25.8 füllen.
Welche formel muss ich da nehmen.
Lieben Dank und einen schönen Tag
Siggi
18.08.2015 05:35:58
Thread-ID: 1442806
5 Beiträge
bestimmtes Datum per VBA
Sascha

Hallo,
ist es möglich per VBA ein bestimmtes Datum zu setzen?
Und zwar habe ich in einer Spalte verschiedene Tage stehen in der Form "Fr", "Sa" und "So". Ich möchte das anhand dessen immer bei "Fr" das Datum von nächster Woche Freitag gesetzt wird, bei "Sa" immer das Datum von nächster...
29.12.2015 08:14:01
Thread-ID: 1466272
15 Beiträge
PC-Datum per Makro ändern
Peter

Hallo Excel-Freund,
ich möchte per Makro das PC-Datum bei einem PC mit Windows 8.1 ändern.
Kann mir jemand schreiben wie das funktioniert?
Danke im Voraus
Peter
06.10.2016 19:08:40
Thread-ID: 1518388
2 Beiträge
Ältestes Datum per Makro filtern
Sash

Hallo zusammen,
gibt es eine Möglichkeit über Makro sich das älteste bzw., Größte datum filtern zu lassen? Mit diesem Makro bekomme ich zwar immer nur das heutige Datum, bringt aber nichts wenn ich eine Rechnungsnummer von heute drin stehen habe und morgen den Button drücke, dann bekomme ic...
17.01.2017 10:55:21
Thread-ID: 1535496
5 Beiträge
Anzeige
Kopiertes Datum per VBA Code in neue Zelle
Steffen

Hallo,
Ich habe folgendes Problem: Ich habe per Makro Daten kopiert. Leider werden diese nicht als Daten angezeigt, sondern quasi als Text. Erst ein Doppelklick "aktiviert" die Zelle zum Datum. Es ginge auch noch die Multiplikation mit 1. Jedoch habe ich eine Reihe von Arbeitsmappen, bei de...
19.06.2018 17:37:31
Thread-ID: 1629524
9 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Datum per Doppelklick in Excel einfügen

Schritt-für-Schritt-Anleitung

Um das aktuelle Datum per Doppelklick in eine Zelle einzufügen, kannst du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne dein Excel-Dokument.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Doppelklicke im Projektfenster auf das Arbeitsblatt, in dem du das Datum per Doppelklick einfügen möchtest (z.B. Tabelle1).

  4. Füge den folgenden Code in das Codefenster ein:

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   If Target.Address = "$J$19" Then
       Target.Value = Date
       Cancel = True
   End If
End Sub

  5. Speichere die Änderungen und schließe den VBA-Editor.

  6. Doppelklicke auf die Zelle J19, um das aktuelle Datum einzufügen.

Wenn du mehrere Zellen einbeziehen möchtest, kannst du die Bedingungen im Code anpassen.

Häufige Fehler und Lösungen

  • Fehler: Das Datum wird nicht eingefügt.

    • Lösung: Stelle sicher, dass der Code im richtigen Arbeitsblatt eingefügt wurde und dass die Zelle nicht geschützt ist.

  • Fehler: Der Code funktioniert nicht bei verbundenen Zellen.

    • Lösung: Verwende den folgenden Code, um sowohl in verbundenen als auch in einzelnen Zellen zu arbeiten:
    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   If Not Intersect(Target, Range("J19:K19")) Is Nothing Then
       Target.Value = Date
       Cancel = True
   End If
End Sub

Alternative Methoden

Wenn du keine VBA-Lösung verwenden möchtest, kannst du auch die Funktion =HEUTE() in eine Zelle eingeben. Diese Methode aktualisiert das Datum jedoch jedes Mal, wenn die Datei geöffnet wird.

Praktische Beispiele

  1. Einzelne Zelle (J19): Verwende den ursprünglichen VBA-Code, um das Datum in J19 einzufügen.
  2. Verbundene Zellen (J19 und K19): Verwende den angepassten VBA-Code, um das Datum in beiden Zellen einzufügen.

Tipps für Profis

  • Du kannst den VBA-Code anpassen, um das Datum in verschiedenen Formaten einzufügen, z.B.:

    Target.Value = Format(Date, "dd.mm.yyyy")

  • Wenn du den Code auf mehrere Zellen anwenden möchtest, kannst du die Intersect-Funktion verwenden, um mehrere Bereiche zu überprüfen.

FAQ: Häufige Fragen

1. Wie kann ich den VBA-Code für andere Zellen anpassen?
Du kannst die Adresse $J$19 im Code einfach durch die Adresse der gewünschten Zelle ersetzen.

2. Was mache ich, wenn ich Excel ohne Makros verwenden möchte?
Du kannst stattdessen die Funktion =HEUTE() direkt in einer Zelle verwenden, musst jedoch beachten, dass das Datum sich bei jedem Öffnen der Datei ändert.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige