Zeit in zelle Speichern

Bild

Betrifft: Zeit in zelle Speichern
von: FPH
Geschrieben am: 19.04.2005 16:50:34
Hallo Excel Gemeinde,
habe ein kleines Problem und finde auch im Archiv nichts dazu.
in zelle a1 wir ein eintrag gemcht ( nur Zahlen ) in b1 soll die zeit des eintrags in a1 angezeigt werden und auch gespeichert werden.Kann mir einer helfen ?
danke für eine Antwort
gruß franzel

Bild

Betrifft: AW: Zeit in zelle Speichern
von: Mathias
Geschrieben am: 19.04.2005 17:00:03
Hallo Franzel,
geh mal in den VBE auf Tabelle1 in füge diesen Code ein

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Range("B1") = Now
End Sub

Gruss
Mathias
PS: Rückmeldung währe nett
Bild

Betrifft: AW: Zeit in zelle Speichern
von: FPH
Geschrieben am: 19.04.2005 17:05:30
Hallo Mathias,
habe mich wohl etwas missverständlich ausgedrückt. bei einer eingabe in spalte a ( also a2 bis A99999) sollen in der entsp. nebenstehenden spalte die zeit der eintragung angezeigt werden somit funktionert dein marco allerdings nur in der einen telle und nicht über die ganze spalte muss ich Range $A$1 durch Range ("a1:A999") ersetzen und das geliche mit der spalte b ,machen ???
danke für eine antwort
Franzel
Bild

Betrifft: AW: Zeit in zelle Speichern
von: Ralf (Schwabenland)
Geschrieben am: 19.04.2005 17:29:06
Hallo Franzl,
probier es mal so:
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 1 Then
    If Not IsEmpty(Cells(Target.Row, 1)) Then
      Cells(Target.Row, 2) = Now
    Else: Cells(Target.Row, 2) = ""
    End If
  End If
End Sub

Gruß
Ralf
Bild

Betrifft: AW: Zeit in zelle Speichern
von: FPH
Geschrieben am: 19.04.2005 17:36:18
Hallo Ralf,

genau das wars,
danke an dich und alle anderen die mir geholfen haben.

Ihe seid super
Gruß Franzel
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Zeit in zelle Speichern"