Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
732to736
732to736
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

automatischer Datum´s eintrag

Forumthread: automatischer Datum´s eintrag

automatischer Datum´s eintrag
Pesi
Hallo Forianer
ich möchte das wenn in zelle G10 "Text" steht soll in L10 das Datum stehen.
Das Datum im Zelle L10 soll aber immer das sein an dem in Zelle G10 "text" geschrieben worden ist.(ich meine es soll am nächsten Tag immer noch das Datum vom vortag stehen).
wenn in Zelle G10 etwas anderes steht soll mann aber ein Wert eintragen können ohne das diese funktion verlohren geht, und das ganze von Zeile 10 bis 300.
ich hoffe es ist verständlich.
LG Pesi
Anzeige

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

Betreff
Benutzer
Anzeige
AW: automatischer Datum´s eintrag
16.02.2006 10:37:53
Andi
Hi,
folgendes ins Modul der Tabelle:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [G10:G300]) Is Nothing Then Exit Sub
If Target.Value = "Text" Then
Target.Offset(0, 5).Value = Date
Else
Target.Offset(0, 5).ClearContents
End If
End Sub

Schönen Gruß,
Andi
Anzeige
AW: automatischer Datum´s eintrag
16.02.2006 11:05:55
Pesi
Hallo Andi
Danke für die schnelle Hilfe ,funktioniert super.
kann man das auch erweitern deine Lösung +
ich möchte das wenn in zelle K10 "Muster" steht soll in J10 das Datum stehen.
Das Datum im Zelle J10 soll aber immer das sein an dem in Zelle J10 "Muster" geschrieben worden ist.(ich meine es soll am nächsten Tag immer noch das Datum vom vortag stehen).
wenn in Zelle J10 etwas anderes steht soll mann aber ein Wert eintragen können ohne das diese funktion verlohren geht, und das ganze von Zeile 10 bis 300.
Anzeige
AW: automatischer Datum´s eintrag
16.02.2006 11:19:07
Andi
Hi,
klar kann man das erweitern:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [G10:G300]) Is Nothing Then
If Target.Value = "Text" Then
Target.Offset(0, 5).Value = Date
Else
Target.Offset(0, 5).ClearContents
End If
ElseIf Not Intersect(Target, [K10:K300]) Is Nothing Then
If Target.Value = "Muster" Then
Target.Offset(0, -1).Value = Date
Else
Target.Offset(0, -1).ClearContents
End If
End If
End Sub

Ein einmal eingetragenes Datum bleibt unverändert, außer man geht am nächsten Tag in die Zelle mit "Text" bzw "Muster" und drückt Enter; das wird als neue Eingabe verstanden, und das Datum wird aktualisiert.
Wenn "Text" bzw "Muster" gelöscht oder durch was anderes ersetzt wird, dann wird das Datum gelöscht.
Achtung: Das Datum wird per Makro eingetragen und gelöscht, und entzieht sich damit dem Rückgängig-Knopf in Excel. Einmal gelöscht -&gt nicht wieder herstellbar.
Schönen Gruß,
Andi
Anzeige
AW: automatischer Datum´s eintrag
16.02.2006 10:38:08
Harald
Hallo Pesi,
rechte Maustaste auf den Tabellenblattreiter, Code anzeigen und diesen Code ins rehcte Codefenster kopieren.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim bereich As Range
Set bereich = Range("G10:G300")
If Target.Column <> 7 Or Target.Count > 1 Then Exit Sub
If Not Intersect(Target, bereich) Is Nothing Then
If Target.Value = "text" Then
Target.Offset(0, 5) = Date
Else
Target.Offset(0, 5) = ""
End If
End If
End Sub

Gruss Harald
Anzeige
AW: automatischer Datum´s eintrag
16.02.2006 10:40:12
Peter
Hallo Pesi,
das könnte z. B. so gehen:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim lZeile As Integer
   For lZeile = 10 To 300
      If Range("G" & lZeile).Value = "Test" Then
         If IsEmpty(Range("L" & lZeile).Value) Then
            Range("L" & lZeile).Value = Date
         End If
      End If
   Next lZeile
Du bist in Excel, drücke Alt+F11, damit wechselst du in den VBA-Editor.
Jetzt gehst du auf das Tabellenblatt, in dem das ganze wirken soll, klickst mit der echten Mousetase darauf, dann auf Code anzeigen und kopierst den Code in das rechte Fenster.
Schließe den VBA-Editor (Schließen-Kreuz rechts oben), gehe auf das Tabellenblatt mit deiner Liste, drücke Alt+F8, wähle das Makro in der Liste aus und klicke auf "Ausführen".
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
;

Forumthreads zu verwandten Themen

Felder mit Datum und Uhrzeit vergleichen?
Lauren

Hallo zusammen,
neues Thema neues Glück :)
Nachdem mir bei meinem letzten Projekt tatkräftig geholfen wurde und ich auch das Projekt erfolgreich beenden konnte hier eine neue Problematik an der ich hängengeblieben bin.
Es sind folgende Saplten vorhanden
Spalte A = Datumanfang in...
16.09.2008 16:24:00
Thread-ID: 1010159
6 Beiträge
Zeile anlegen, dann Datum von heute
heute

Hallo Leute,
ich hab (mal wieder) ein kleines Problem und hoffe auf eure Unterstützung.
Ich habe eine Exceltabelle, in der noch fast nichts drin steht.
Jetzt würde ich es gerne so haben, dass, wenn ich eine neue Zeile anlege (z.B. mit Kundendaten), soll er mir in einer bestimmten Ze...
23.09.2008 16:37:51
Thread-ID: 1011817
12 Beiträge
Datumsübernahme von Exel in Serienbrief Word
Exel

Hallo Ihr Spezialisten,
ich habe ein kleines Problem mit der Übertragung von zwei Spalten, die Datumsangaben enthalten. Diese werden in einen Word Serienbrief übertragen und werfen dann leider nur noch 5-stellige Zahlen aus.
Wo ist das Problem? Wir haben die Formatierungen alle abgesche...
17.10.2008 12:37:30
Thread-ID: 1017121
3 Beiträge
Aktuelles Datum und aktuelle Uhrzeit
Herbert

Hallo Experten,
ich möchte gern in Zelle A1 das aktuelle Datum und die aktuelle Uhrzeit ausgegeben habe. So soll es aussehen: "20.11.2008 11:40:04".
Bin als Laie schon ziemlich überfordert und für jede Hilfe dankbar.
Gruß Herbert
20.11.2008 11:38:00
Thread-ID: 1026354
2 Beiträge
Aufgabe an Outlook wenn Datum gleich heute
Lucia

Hallo zusammen,
Mit dem nachfolgenden Makro möchte ich die jeweiligen, nach Themen definierten Maßnahmen als Outlookaufgaben verteilen. Das klappt ganz gut. Was ich nicht hinbekomme, ist eine If Schleife, die prüft, ob das Datum in Aendd (Datum der letzten Änderung) dem heutigen entspricht...
26.11.2008 16:00:07
Thread-ID: 1028078
3 Beiträge
Datum und Uhrzeit mit einem Tastendruck
P.

Hallo.
ich möchte eine Art Zeiterfassung einrichten. Hierbei soll mit einem Tastendruck Datum und Uhrzeit in einer Zelle erscheinen. Das für Start, Pausenanfang, Pauseneendeund Ende. Anschließend will ich die verbrauchte Zeit ausrechnen.
Kann mir jemand helfen? Im Archiv habe ich nicht...
06.12.2008 13:05:21
Thread-ID: 1030655
13 Beiträge
Anzeige
aktuelles Datum anzeigen
Philipp

Hallo liebe Herber-Gemeinde,
ich möchte gern, dass mir Excel das aktuelle Datum in einer Zelle anzeigt. Weiss leider nicht wie das geht.
Vielleicht kann mir zusätzlich noch jemand sagen, wie man das mit einer Formel verknüpft wenn ich die Datumzelle mit der Bezeichnung "heut" in eine Fo...
09.12.2008 08:53:21
Thread-ID: 1031245
3 Beiträge
Verketten von Datum und Uhrzeit
Datum

Hallo Zusammen,
ich möchte ein Datum und eine Uhrzeit die in 2 verschiedenen Zellen stehen verketten. Bei der Verkettung wird das Datums und Uhrzeitformat in Zahlen dargestellt. Wie kann man die Verkettung gestalten, dass die Formate erhalten bleiben?
Gruß Rafi
16.12.2008 14:09:00
Thread-ID: 1033272
5 Beiträge
Wenn ijn Spalte Datum von Jänner dann Werte zählen
Jänner

Hallo!
Ich habe in der Spalte A ab der Zeile 3 Datumwerte aus den Wochenenden und den Feiertagen stehen.
In der spalte G, H, I stehen nun Werte.
Ich möchte nun alle Werte in Abhängigkeit des Datums zusammenzählen.
Ist in der Spalte A das Jänner Datum vorhanden dann sollen die We...
07.01.2009 08:42:00
Thread-ID: 1037440
4 Beiträge
DATUM UND UHRZEIT
Lutz

Hallo zusammen,
hab mich für folgende Lösung entschieden :
'********************************************************************************
'*...
27.01.2009 21:18:30
Thread-ID: 1044394
4 Beiträge
Anzeige
DATUM UND UHRZEIT
eric

Hallo,
man kann das auch aufwendiger in der unserform mit einer abfrage machen, die idee mit dem modul funktioniert sicher.
eric
27.01.2009 21:37:18
Thread-ID: 1044401
2 Beiträge
Mehr als sieben Werte bei WENN(Prüfung;Dann_Wert;S
Florian

Hallo zusammen,
WENN(Prüfung;Dann_Wert;Sonst_Wert). Leider kann ich nicht mehr als sieben Werte eingeben.
Gibt es eine Möglichkeit diese Obergrenze zu Umgehen?
Danke schon mal und schönes Wochenende :-)
13.03.2009 14:55:58
Thread-ID: 1059900
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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