One way:

If you only want time, then cell 1 can be ignored.

Dim dNewTime As Double
dNewTime = Range("cell_2").Value + _
TimeSerial(0, Range("cell_3").Value * 15, 0)
MsgBox Format(dNewTime, "hh:mm")



In article ,
"Mike" wrote:

I have an Excel sheet with the date in one cell (formated for date) and the
time in another cell (formated for time). What I need to do is create a
string that has a new time based on the value of a 3rd cell.

i.e. cell 1 = 5/25/04
cell 2 = 08:00 am
cell 3 = 5

8:00 pm * 105(15 minutes for each value of cell 3) = 09:15 am

How do I do this in VB?