Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Uhrezit in Tabelle Speichern mit Userform

Uhrezit in Tabelle Speichern mit Userform
marspoki
Hallo ich habe ein kleines Problem.
Ich speicher Daten aus einem Userform in einer Tabelle.
Wenn ich Uhrzeit bsp: 06:30 speichere, kann ich damit nicht weiter rechnen. Was mache ich da falsch!?
Hat jemand einen Idee?
Hier der Code
Private Sub U_Speichern()
If TextBox1VO.Value > 0 Then
Letzte = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
Set Bereich = ActiveSheet.Range("D1:D" & Letzte) _
.Find(TextBox1VO.Value, lookat:=xlWhole)
If Bereich Is Nothing Then
MsgBox "Geht nicht"
Else
Zeile = Bereich.Row ' Zeile in der der Begriff gefunden wurde
Cells(Zeile, 25) = TextBoxOZMoA
Cells(Zeile, 26) = TextBoxOZMoE
End If
End If
End Sub

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
versuche es mal mit TimeValue
28.09.2009 11:38:06
Tino
Hallo,
teste mal so
Range("H1") = TimeValue(TextBox1)
Gruß Tino
AW: versuche es mal mit TimeValue
28.09.2009 11:56:14
marspoki
So gehts Prima.
Vielen Dank
AW: Uhrezit in Tabelle Speichern mit Userform
28.09.2009 11:54:59
David
Hallo "nickname"
Eine Textbox enthält zunächst erst mal nur Text.
Alternativ zum Vorschlag von Tino kannst du auch versuchen, per Rechenoperation eine Umwandlung in eine Zahl zu erzwingen, z. Bsp. *1, +0 etc.
(Allerdings weiß ich nicht, ob das in VBA auch geht, bei Formeln funzt das jedenfalls)
Gruß
David
Anzeige
geht in VBA so nicht, aber man kann...
28.09.2009 12:22:46
Tino
Hallo,
die Evaluate-Methode anwenden.
z. Bsp.
Range("A1") = Application.Evaluate("""" & TextBox1 & """ * 1")
Gruß Tino
sinnvollerweise CDATE() nehmen owT
28.09.2009 13:15:37
Rudi
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige