Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Piet12 vom 05.09.2020, 19:46 Options
Nach Änderung von verschiedenen Zellen in einer Zeile; Datum setzen?
Hallo zusammen,
habe eine Frage: Wenn in einer oder allen Zellen z.B. A2 bis E2 Änderungen vorgenommen worden sind, soll z.B. in Zelle F2 das aktuelle Datum gesetzt werden, geht das?
Gruß Piet
habe eine Frage: Wenn in einer oder allen Zellen z.B. A2 bis E2 Änderungen vorgenommen worden sind, soll z.B. in Zelle F2 das aktuelle Datum gesetzt werden, geht das?
Gruß Piet
Antwort 1 von rainberg vom 05.09.2020, 20:17 Options
Hallo Piet,
kopiere diesen Code ins Codefenster des relevanten
Tabellenblattes.
Gruß
Rainer
kopiere diesen Code ins Codefenster des relevanten
Tabellenblattes.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2:E2")) Is Nothing Then
Target.Offset(0, 6 - Target.Column).Value = Date
End If
End Sub
Gruß
Rainer
Antwort 2 von Piet12 vom 07.09.2020, 15:05 Options
Hallo Rainer,
vielen Dank für die prompte Antwort.
Leider funktioniert es nicht. Ich habe es in das Codefenster eingetragen und in dem Tabellenblatt getestet.
Meine Frage bezog sich auf Beispielzellen:
Wenn in einer oder allen Zellen z.B. A2 bis E2 Änderungen vorgenommen worden sind, soll z.B. in Zelle F2 das aktuelle Datum gesetzt werden, geht das?
Gibt es vielleicht für den nachfolgenden Sachverhalt eine Lösung:
A2 bis E2 Änderungen vornehmen; Änderungsdatum in F2;.
A3 bis E3 Änderungen vornehmen; Änderungsdatum in F3;
usw.
Gruß
Piet
vielen Dank für die prompte Antwort.
Leider funktioniert es nicht. Ich habe es in das Codefenster eingetragen und in dem Tabellenblatt getestet.
Meine Frage bezog sich auf Beispielzellen:
Wenn in einer oder allen Zellen z.B. A2 bis E2 Änderungen vorgenommen worden sind, soll z.B. in Zelle F2 das aktuelle Datum gesetzt werden, geht das?
Gibt es vielleicht für den nachfolgenden Sachverhalt eine Lösung:
A2 bis E2 Änderungen vornehmen; Änderungsdatum in F2;.
A3 bis E3 Änderungen vornehmen; Änderungsdatum in F3;
usw.
Gruß
Piet
Antwort 3 von rainberg vom 07.09.2020, 16:03 OptionsLösung
Hallo Piet,
... genau das macht das Makro, ist getestet.
So funktioniert das makro im gesemten Bereich A:E.
Gruß
Rainer
Zitat:
Meine Frage bezog sich auf Beispielzellen:
Wenn in einer oder allen Zellen z.B. A2 bis E2 Änderungen vorgenommen worden sind, soll z.B. in Zelle F2 das aktuelle Datum gesetzt werden, geht das?
Meine Frage bezog sich auf Beispielzellen:
Wenn in einer oder allen Zellen z.B. A2 bis E2 Änderungen vorgenommen worden sind, soll z.B. in Zelle F2 das aktuelle Datum gesetzt werden, geht das?
... genau das macht das Makro, ist getestet.
So funktioniert das makro im gesemten Bereich A:E.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A:E")) Is Nothing Then
Target.Offset(0, 6 - Target.Column).Value = Date
End If
End Sub
Gruß
Rainer
Ähnliche Themen
Zellen von verschiedenen Tabellenblättern übernehmen
JeremyMcNeill 28.08.2007 - 32 Hits - 3 Antworten
Vergleich von Zellen in verschiedenen Excel Dateien
Pogoseuche 20.02.2008 - 24 Hits - 6 Antworten
Ergebnis in verschiedenen Zeile
Madue 10.04.2008 - 3 Hits - 2 Antworten
Excel; Sortieren; 2 Zellen in Verbindung setzen
detommy 19.05.2008 - 149 Hits - 1 Antwort
gleicher Text in verschiedenen Zellen
britappi 09.07.2008 - 28 Hits - 1 Antwort
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
