Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
448to452
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
448to452
448to452
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datum automatisch einfügen

Datum automatisch einfügen
06.07.2004 21:30:42
Silvio
Hallo,
habe noch eine Frage, anbei Excelliste.

Die Datei https://www.herber.de/bbs/user/8165.xls wurde aus Datenschutzgründen gelöscht

Wenn ich in einer Spalte Beworben am schreibe, soll automatisch das aktuelle Datum in die nächste Spalte eingefügt werden.
Vielen Dank für die Hilfe
Gruß Silvio

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum automatisch einfügen
06.07.2004 21:39:47
Giuseppe
Hallo Silvio
du kannst in die Zelle die Fuznktion:
=jetzt()
schreiben...
anschliessend kannst du noch die Zelle Formatieren:
z.B
"TTT.MM.JJJJ"
mfg
Giuseppe
AW: Datum automatisch einfügen
andreas
hallo ihr beiden,
das wird so wohl nix ! Das ändert sich dann ja beim nächsten öffnen !
Das ist so wohl nicht gewöllt, oder ?
Besser wäre es händisch über strg . das datum fix ein zu fügen-
andernfalls muss es eine vba lösung sein.
Gruß
Andreas E
http://www.skripteundaufgaben.de
viele kostenlose Downloads und Links zu EXCEL und mehr
http://www.fachforen.de
eine Linksammlung zu diversen fachforen
Anzeige
AW: Datum automatisch einfügen
06.07.2004 21:45:53
Silvio
so einfach ist das leider nicht, da das datum sich ja aktualisiert...
erst dann, wenn ich schreibe beworben an soll er automatisch das datum einfügen
danke für die hilfe
AW: Datum automatisch einfügen
andreas
hallo,
wie schon gesagt , nicht über formel, wenn dann nimm diesen code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim bereich As Range
Set bereich = Range("K:K")
For Each zelle In bereich
If IsEmpty(zelle.Offset(0, 1)) And zelle.Value = "beworben" Then
zelle.Offset(0, 1).Value = Date
Exit Sub
End If
Next
End Sub

gruß
andreas e
Gruß
Andreas E
http://www.skripteundaufgaben.de
viele kostenlose Downloads und Links zu EXCEL und mehr
http://www.fachforen.de
eine Linksammlung zu diversen fachforen
Anzeige
AW: Datum automatisch einfügen
andreas
hallo silvio,
habe mir deine andere frage schon angesehen - leider hab ich da auch keine idee -
Gruß
Andreas E
http://www.skripteundaufgaben.de
viele kostenlose Downloads und Links zu EXCEL und mehr
http://www.fachforen.de
eine Linksammlung zu diversen fachforen
geht kürzer :-)
06.07.2004 23:06:21
ExceL
hi

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 11 Then 'bereich von A-K
If Cells(Target.Row, 13) = "" Then
Cells(Target.Row, 13).Value = Date
End If
End If
End Sub

bsp.datei
https://www.herber.de/bbs/user/8170.xls
Gruß
Christian
Anzeige
AW: geht kürzer :-) ?
andreas
hallo christian,
mag ja kürzer sein, aber was macht es denn ?
Aufgabe war doch wenn in K "beworben" steht in L das aktuelle datum ein zu fügen-
wird bei dir aber nicht gemacht, oder verstehe ich da was falsch ?
Gruß
Andreas E
http://www.skripteundaufgaben.de
viele kostenlose Downloads und Links zu EXCEL und mehr
http://www.fachforen.de
eine Linksammlung zu diversen fachforen
AW: geht kürzer :-) ?
06.07.2004 23:45:02
ExceL
Hi

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 12 Then
If Cells(Target.Row, 13) = "" Then
Cells(Target.Row, 13).Value = Date
End If
End If
End Sub

dann reicht das
nur nicht selectionchange nehmen!!
da wird der Code ja jedesmal ausgeführt
und for each sparst du dir auch :-)
gute Nacht
Christian
Anzeige
ps ich habe Spalte M genommen
ExceL
hi
und nicht K
habe nochmal die Aufgabenstellung gelesen
"Wenn ich in einer Spalte Beworben am schreibe"
wobei das auch für die Spalten A-M gelten kann oder :-)
Gruß
Christian
AW: ps ich habe Spalte M genommen
Silvio
na dann probier ich das mal
DANKE derweil

130 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige