Error Converting Textbox Time entry to A Decimal

[Ark68]

I am getting a type mismatch converting a time entered into a userform textbox ('me.tb_s1_lwr') to its decimal equivalent.

Dim bkg_start as double
Dim slwr_time as double
bkg_start = CDbl(Me.tb_s1_lwr.Value)
slwr_time = bkg_date + bkg_start

The value of Me.tb_s1_lwr = "8:00 AM".

I tried CInt and CLng similarly with no change.

 

[EXCEL MAX]

Hello Ark68,
try to use "TimeValue"...

    Dim bkg_start As Double
    Dim bkg_date As Double
    Dim slwr_time As Double
    bkg_start = TimeValue(Me.tb_s1_lwr.Value)
    slwr_time = bkg_date + bkg_start

 

[Ark68]

Thank you Excel Max. That was what I needed!!!
I'm going to have to remember that. I'm going to need it more frequently for sur!

 

[EXCEL MAX]

I'm glad that you are found this as solution.