On the line where you transmit the the data from the inputbox to cell you
need to use the & function to add the :00 to the end e.g.

sheet1.range("A1").value = inputbox & ":00"

Close enough?



--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200605/1