Excel 2003 Datum Uhrzeit

Dieses Thema Excel 2003 Datum Uhrzeit im Forum "Microsoft Office Suite" wurde erstellt von joergi78, 13. Juli 2007.

Thema: Excel 2003 Datum Uhrzeit guten morgen an alle fleißigen, kann ich es in Excel 2003 realisieren, dass wenn ich in Zelle A2 etwas eintrage, in...

  1. guten morgen an alle fleißigen,
    kann ich es in Excel 2003 realisieren, dass wenn ich in Zelle A2 etwas eintrage, in Zelle A1 das Datum und die Uhreit der Eintragung steht?
    Diesen Teil habe ich ja geschafft,
    aber die Zelle A1 DARF nicht mehr verändert werden, auch wenn ich die Zelle A2 aktualisiere.
    Hoffe ihr könnt mir helfen,

    gruß joergi78
     
  2. sauber, dass klappt schon mal.
    Welcher Teil muss den angepasst werden, wenn das Datum immer in Spalte A steht.
    Also z.B. so:
    A1 = Datum wenn B1 = Text
    A2 = Datum wenn B2 = Text
    A3 = Datum wenn B3 = Text
    A4 = Datum wenn B4 = Text
     
  3. Hallo Joergi78,

    dann versuchs mal damit ;)

    (Der Code muß in der Code-Seite des überwachten Blattes liegen)

    Gruß Matjes :)
    Code:
    Private Sub Worksheet_Change(ByVal Target As Excel.Range)
     
    ->< < < A N P A S S E N > > >
     Const cZ_ERSTEZEILE = 1-> ab Zeile 1
     Const cSP_DATUM = 1  -> entspricht A
     Const cSP_UEBERWACHT = 2-> entspricht B
    ->< < < A N P A S S E N  E N D E > > >
     
     Dim Zelle As Range
     Dim dDate As Date
     
    ->datum bilden
     dDate = Now()
     dDate = dDate \ 1
     
     For Each Zelle In Target
     ->Änderung in Änderungsspalte ?
      If Target.Column = cSP_UEBERWACHT Then
       If Target.Row >= cZ_ERSTEZEILE Then
        With Target.Parent.Cells(Target.Row, cSP_DATUM)
         .NumberFormat = dd.mm.yy
         .Value = dDate
         .EntireColumn.AutoFit
        End With
       End If
      End If
     Next
    AUFRAEUMEN:
     Set Zelle = Nothing
    End Sub
     
  4. ja wunderbatr, nur die Uhrzeit wird noch nicht angezeigt.
    Wenn ich NumberFormat = dd.m.yy auf NumberFormat = dd.m.yy h:mm ändere, schreibt der mir immer die Zeit auf 0:00.
     
  5. Tschuldige,

    hab die Uhrzeit überlesen. Version mit Uhrzeit(s.unten)

    Gruß Matjes :)
    Code:
    Private Sub Worksheet_Change(ByVal Target As Excel.Range)
     
    ->< < < A N P A S S E N > > >
     Const cZ_ERSTEZEILE = 1-> ab Zeile 1
     Const cSP_DATUM = 1  -> entspricht A
     Const cSP_UEBERWACHT = 2-> entspricht B
    ->< < < A N P A S S E N  E N D E > > >
     
     Dim Zelle As Range
     Dim dDate As Date
     
    ->datum bilden
     dDate = Now()
     
     For Each Zelle In Target
     ->Änderung in Änderungsspalte ?
      If Target.Column = cSP_UEBERWACHT Then
       If Target.Row >= cZ_ERSTEZEILE Then
        With Target.Parent.Cells(Target.Row, cSP_DATUM)
         .NumberFormat = dd.mm.yy hh:mm
         .Value = dDate
         .EntireColumn.AutoFit
        End With
       End If
      End If
     Next
    AUFRAEUMEN:
     Set Zelle = Nothing
    End Sub
     
  6. ja, nur wenn ich die Zelle z.B. B1 ändere, ändert sich auch die Uhrzeit[br][br]Erstellt am: 13.07.07 um 09:49:18[hr][br]Danke, konnte mein Problem lösen. Die Zelle B2 wird ja mit einer Formel angesprochen. Wenn einmal was eingetragen wurde, wird sie ja nicht mehr geändert.
    gruß joergi78
     
Die Seite wird geladen...

Excel 2003 Datum Uhrzeit - Ähnliche Themen

Forum Datum
Excel 2003 - Kleines Problem mit einer Formel Microsoft Office Suite 25. Juni 2014
Office 2003 und 2010 Paralellinstallatin, mehrer xls-Dateien Excel 2003 zuweisen Windows XP Forum 13. Juli 2012
2 Spalten in Excel 2003 fixieren Microsoft Office Suite 28. Mai 2012
MS Excel 2003 ganze Zeilen löschen Microsoft Office Suite 1. Okt. 2011
Verlinkung nach Umstieg Excel 2003 auf 2007 Microsoft Office Suite 23. Mai 2011