hoffentlich jetzt besser formatiert
.
Hallo Sascha,
ich dachte du möchtest aus einer Userform in ein Excelblatt die Zeit übertragen, und
danach dann im Blatt VLookup einfügen um dies auszuwerten.
Du möchtest aber gleich aus dem Textfeld mit VLookup ein Wert ermitteln.
Allerdings hast du so ein Problem, denn in deinem Textfeld ist erst mal Text (keine Zeit) enthalten.
und VLOOKUP kann aus dem Text, mit dieser Formatierung, keine Zeit erkennen.
Du überträgst aber weiter oben im Code die Zeit in Spalte 12
ActiveSheet.Cells(intErsteLeereZeile, 12).Value = Me.txtLaufdisziplin.Value
Hier solltest du den Trick mit FormulaLocal anwenden.
ActiveSheet.Cells(intErsteLeereZeile, 12).FormulaLocal = Me.txtLaufdisziplin.Value
Und dann beim VLookup nicht das Textfeld verwenden, sondern die Zelle mit dem richtigen Zeitformat.
ActiveSheet.Cells(intErsteLeereZeile, 17).Value = Application.VLookup(ActiveSheet.Cells(intErsteLeereZeile, 12).Value, Sheets("Tabellen").Range("O10:S25"), 5, True)
|