Private Sub TextBox9_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox8 <> "" And TextBox9 <> "" Then Label63 = (TextBox9.Value -
TextBox8.Value) * 24
End Sub

With the above line of code, i am trying to gain the value in Hours between
the 2 textboxes, but i get an error.

Textbox8.value = 3:30PM
Textbox8.value = 7:30AM

??

Private Sub TextBox9_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox8.Text <> "" And TextBox9.Text <> "" Then _
Label63.Caption = (TimeValue(TextBox9.Value) - _
TimeValue(TextBox8.Value)) * 24
End Sub



--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Corey ...." <(E-Mail Removed)> wrote in message
news:eJtWDb$(E-Mail Removed)...
> Private Sub TextBox9_Exit(ByVal Cancel As MSForms.ReturnBoolean)
> If TextBox8 <> "" And TextBox9 <> "" Then Label63 = (TextBox9.Value -
> TextBox8.Value) * 24
> End Sub
>
> With the above line of code, i am trying to gain the value in Hours
> between the 2 textboxes, but i get an error.
>
> Textbox8.value = 3:30PM
> Textbox8.value = 7:30AM
>
> ??
>
>
>

Thank you BOB.

Perfect !!

"Bob Phillips" <(E-Mail Removed)> wrote in message
news:er%(E-Mail Removed)...
> Private Sub TextBox9_Exit(ByVal Cancel As MSForms.ReturnBoolean)
> If TextBox8.Text <> "" And TextBox9.Text <> "" Then _
> Label63.Caption = (TimeValue(TextBox9.Value) - _
> TimeValue(TextBox8.Value)) * 24
> End Sub
>
>
>
> --
> HTH
>
> Bob
>
> (there's no email, no snail mail, but somewhere should be gmail in my
> addy)
>
> "Corey ...." <(E-Mail Removed)> wrote in message
> news:eJtWDb$(E-Mail Removed)...
>> Private Sub TextBox9_Exit(ByVal Cancel As MSForms.ReturnBoolean)
>> If TextBox8 <> "" And TextBox9 <> "" Then Label63 = (TextBox9.Value -
>> TextBox8.Value) * 24
>> End Sub
>>
>> With the above line of code, i am trying to gain the value in Hours
>> between the 2 textboxes, but i get an error.
>>
>> Textbox8.value = 3:30PM
>> Textbox8.value = 7:30AM
>>
>> ??
>>
>>
>>
>
>