如何为列中的每个单元格插入20个date

我已经给了一个excel列的数字,我想要创build一个新的列,每个单元格的内容重复20次和20个date顺序依次到另一列。
我怎样才能在Excel或访问中实现这一点?
例如,我有一个数字列如下:

0491703316
0235361458
0380458968
0240510098
0169346827
0147826672

我想这样做

0491703316 01/12/2016
0491703316 02/12/2016
0491703316 03/12/2016
0491703316 04/12/2016
………………….
………………….
0235361458 01/12/2016
0235361458 02/12/2016
0235361458 03/12/2016
0235361458 04/12/2016
……………………
……………………
……………………
0380458968
0240510098
0169346827
0147826672

将Access中的范围链接为名为LinkedTable的链接表。

然后创build这个查询:

PARAMETERS Period Text ( 255 ), Periods Short, FirstDate DateTime; SELECT DISTINCT LinkedTable.Number, 10*Abs([Deca].[id] Mod 10)+Abs([Uno].[id] Mod 10)+1 As Sequence, DateAdd([Period],[Sequence]-1,[FirstDate]) AS [DateStart] FROM LinkedTable, MSysObjects AS Uno, MSysObjects AS Deca WHERE 10*Abs([Deca].[id] Mod 10)+Abs([Uno].[id] Mod 10)<[Periods] 

运行这个参数:

 Period: d Periods: 20 FirstDate: 2016-12-01 

假设0491703316在A1,在B8input01/12/2016并复制到B28。 将B8:B28复制到B29。 selectB8:B29并向下拖到B133。 在A8中input=A1和在A9中:

 =IF(B9=B$8,INDEX(A:A,MATCH(A8,A:A,0)+1),A8) 

复制A9以适应。