wer kann mir helfen ?

[Thomasius]

sorry habe nich dein vorschlag ignoriert , habe es versucht aber leider ohne ervolg .Habe extra die tabelle hochgeladen zur anschauung
wichtig ist das in F die Zeit als 00:00 dargestellt wird

frohe weihnachten gruss Thomasius

[Thomasius]

Sorry habe dein Vorschlag nicht Ingnoriert habe es versucht aber leider ohne ervolg.
wichtig ist das in F die Zeit 00:00 angezeigt wird
Frohe weihnachten gruss Thomasius

[DL]

habe es versucht aber leider ohne ervolg .Habe extra die tabelle hochgeladen zur anschauung

Aber ohne die Formel bzw. deinen Versuch.

[Thomasius]

wehre es möglich meine hochgeladene Datei so zu endern das wenn ich frei schreibe in zeit 00:00 steht
wenn nicht , auch gut und danke

[Calderon]

Wo ist denn jetzt das Problem, eine Verweistabelle (siehe Bild) zu erstellen, auf die du mit der Formel von Detlef zugreifst?

   

[Thomasius]

ok bin ich nicht fähig zu danke euch allen

[Calderon]

Wie die Sverweis-Funktion funktioniert:
https://www.youtube.com/watch?v=K6_ireSTU98

[Roger 57]

Moin,

hab dir da mal eine Tabelle zusammengestellt.

Frohe Weihnachten und einen guten Rutsch wünscht


Roger


  Exel Test Frei_1.xlsx (Größe: 25,16 KB / Downloads: 7)

[Thomasius]

super Danke für die Tabelle
danke dir auch schöne Weihnachten .exel will immer reparieren beim öffnen

[Thomasius]

eins noch :
ich habe

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Eingabe As Variant
On Error GoTo fehler1

If Not Intersect(Target, Range("C2,H2,F37,F43,C5:E35")) Is Nothing Then
Application.EnableEvents = False
With Target
If Not IsNumeric(.Value) Then GoTo fehler1
If IsEmpty(Target) Then
Target.Value = ""
GoTo fehler1
End If
.Value = Left(Format(Target, "0000"), 2) & ":" & Right(Target, 2)
' funkt am besten
' Wenn Std über 24 und gleichzeit Minuten über 60 erfasst werden, wird Text zurückgegeben.
.NumberFormat = "[hh]:mm"
End With
End If

fehler1:
Application.EnableEvents = True
End Sub

klappt alles super nun möchte ich in F47 3 stellig haben habe das versucht :.Value = Left(Format(Target, "00000"), 3) & ":" & Right(Target, 2)
aber wie kann ich beide befehle verwenden ?