UserForm TextBox - Format as minutes only

[Alan_P]

Hi Guys,

I'm absolutely stumped on what I thought would be very very easy and could do with some help please!

I've got a time value in cell A1, say 10:45. On my UserForm I've got two TextBoxes, in the first one I want to show the hour value - "10", in the second one I want to show the minute value - "45"

The hour value is easy:

TextBox1.Value = Format(Cells(1, 1).Value, "HH")

But I can't for the life of me figure out how to get the minute value in a textbox!

Any help would be very much appreciated!
Thanks,
Alan.

 

[Alan_P]

hmmm never mind, the first thing I tried after I clicked post worked

TextBox1.Value = Right(Format(Cells(1, 1).Value, "HH:MM"), 2)

My brain's having a lazy day

 

[VoG]

How about

TextBox1.Value = Hour(Range("A1").Value)
TextBox2.Value = Minute(Range("A1").Value)

 

[Alan_P]

That is much cleaner VoG!! Thank you very much!

 

[Rick Rothstein]

How about

TextBox1.Value = Hour(Range("A1").Value)
TextBox2.Value = Minute(Range("A1").Value)

The OP should definitely be using those functions. Just pointing out for those who do not mind using the square bracket version of Evaluate (when the cell address is fixed and non-changing), there is this compact version of your code lines...

 TextBox1.Value = Hour([A1])
 TextBox2.Value = Minute([A1])

 

[Alan_P]

That's two new tricks I've learned today thanks guys!