Userform textbox to accept only time format.

[pedie]

Hi,

HOw can I make userform1. textbox1 & textbox2 to accept only time format in hh:mm
then I want textbox3.value = textbox2.value -textbox1.value in time format.
keeps getting error

Private Sub TextBox3_Enter()
TextBox3.Value = TextBox2.Value - TextBox1.Value
End sub

Thanks
Pedie

 

[pedie]

Still not working...hope someone can advice on what i must do here....

Private Sub CommandButton1_Click()
UserForm2.TextBox1.Value = Format(Time, "hh:mm:ss AM/PM")
End Sub
 
Private Sub CommandButton2_Click()
UserForm2.TextBox2.Value = Format(Time, "hh:mm:ss AM/PM")
UserForm2.TextBox3.Value = Format(TextBox2.Value - TextBox2.Value, "hh:mm:ss am/pm")
End Sub

 

[meldoc]

Hi Pedie

Spotted this last night, but it was getting late, does this work,

<font face=Courier New><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> CommandButton1_Click()<br>UserForm2.TextBox1.Value = Format(TextBox1.Value, "hh:mm:ss AM/PM")<br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN><br> <br><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> CommandButton2_Click()<br>UserForm2.TextBox2.Value = Format(TextBox2.Value, "hh:mm:ss AM/PM")<br>mytime1 = TimeValue(UserForm2.TextBox1.Value)<br>mytime2 = TimeValue(TextBox2.Value)<br>mytime3 = mytime2 - mytime1<br>UserForm2.TextBox3.Value = Format(mytime3, "hh:mm")<br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN><br></FONT>

 

[pedie]

Hi Brian, I thought no one was answering on this so did check back today untill now...
Thanks alot for looking into this. I thought you're not around this days...("Didn't see you here so..")
Anyways..when i click on the first button nothing happened. but when i clicked on CommandButton2 it gave runtime error 13' type mismatch

Thanks again
Pedie

 

[meldoc]

Pedie,

What did you enter into Textbox1, and Textbox2.
When I enter 8:00 into Textbox1, and press button one the time is formatted as 08:00:00 AM.
Then if I enter 2:45 pm, or 14:45, into Textbox2 and press button two the time is formatted as 02:45:00 PM.
And Textbox3, displays 06:45, is this not what you wanted.

 

[pedie]

Sorry, Brian, i didnt know that it works that way...
I was clicking on command button without wrting anything on textbox and waiting if the click would give any result....


Thanks again so much!

Pedie

 

[meldoc]

I was clicking on command button without wrting anything on textbox and waiting if the click would give any result....

It did Pedie.

it gave runtime error 13' type mismatch

 

[pedie]

Now it is working perfect thank alot again Brian

 

[onmyway365]

You helped me as well - thank you!