VBA within excel, Setting time so that the : isn't editable.

[PetSlug]

Good Morning!

I have what might seem to be a simple question to most but I feel like Pinky off Pinky and the Brain...

So here it is... "I have the following code for a textbox within my excel.

Private Sub TextBox4_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

Select Case KeyAscii

    Case 48 To 57 'For Numbers 0 to 9

    Case 58 'For : as it's time I was selected in my box!
       If InStr(ActiveControl, ":") Then KeyAscii = 0

    Case Else
       KeyAscii = False
End Select

End Sub

In the user form part of the tool I have it so that it picks up the time on my desktop so people have some what of an idea what to put in which is working kind of how I would like it... I would like to get it so when people edit the time so that it's almost exactly when the event happened they are only able to edit the HH and the MM but the : Between the HH:MM < Like that is not able to be erased.

Is this possible?

Thanks,
John.

 

[Snakehips]

John,

Welcome to MrExcel.

I'm not convinced that you can avoid the user editing the colon in that way.

Here is a link to a small example file where I have used two independent text boxes, one for hours input and one for minutes in order to capture a time in a way that might suit you.

https://www.dropbox.com/s/r5pew0enwm7p6lv/Time_Input.xlsm?dl=0


Hope that helps.

 

[PetSlug]

That's cool! ... Cheers!!!

 

[Snakehips]

You are welcome. Tanks for the feedback.