Sorry Bob I have not gone away yet, me being thick, I can't seem to combine
both the Calendar and the time select code in the same work book. I have
attached the two.

Any ideas?

Shane
"Bob Phillips" wrote in message
...


"Shane Nation" wrote in message
...
Thanks Bob that would be just right if I could get the chosen time into
the
cell I click in.

Just replace

MsgBox Format(frmTime.SelectedTime, "hh:mm")


with

.value = Format(frmTime.SelectedTime, "hh:mm")

And I could hold of the code so I can place it in the sheet
I am working with?


What do you mean by that?