VBA for time - Userform to Sheet

[KristinaSkutt]

Having an issue moving a time from a userform (formatted as shorttime plus an option button for AM/PM). On the sheet, it is formatted as HH:mm with an am/pm.

This is what I use to retrieve the info from the sheet (works well)
<code>
If Hour(Cells(r, 12).Value) < 12 Then
data.txtPickup1 = FormatDateTime((Cells(r, 12)), vbShortTime)
data.optAM1 = True


Else: data.txtPickup1 = FormatDateTime((Cells(r, 12)), vbShortTime)
data.optPM1 = True
</code>

I have no idea how to get the updated info from the userform back to the sheet. Any advice?? Thank you!!

 

[RickXL]

Hi,

Try:

Cells(r, 12) = TimeValue(Data.<code>txtPickup1)

</code>