为B列中的每个日期填充B列中的时间范围

Question

I need to generate something like this in excel. For each date in 'Date ' column, I need to fill times between 13:00 and 22:00 with 15 minute intervals. Note: The dates in Column D are not serial. They have to be taken from a list which can reside in another column/worksheet. Any help is appreciated on this.

Date, Time
1 apr-2013, 13:00
1-apr-2013, 13:15
..
..
..
1-apr-2013, 22:00
2-apr-2013, 13:00
..
2-apr-2013, 22:00
8-apr-2013, 13:00
.
8-apr-2013, 22:00

Answer 1

This formula may work for you. It will check to see if the date in the previous row is equal to the date in the current row; if it is not, then it will set the time as your start time (13:00). If it is, then it adds 15 minutes to the time above the current row.

=IF(A2<>A1,TIME(13,0,0),B1+TIME(0,15,0))

This formula can be placed next to all of your dates (in the time column)

Answer 2

You can probably use the DateAdd function in VBA. http://www.techonthenet.com/excel/formulas/dateadd.php

For example, this would copy the date in cell A1 to A2 and add 15 minutes to it

Range("A2") = DateAdd("n", 15, Range("A1"))