我想使用 Excel 填充一系列日期,准确地说是每月的 1 号到 15 号。
我的电子表格目前如下所示:
当我向下拖动时,它看起来像这样:
它不会继续这种模式,而只是重复那里的内容。我尝试了以下每个自动填充选项,但都无济于事:
- 复制单元格
- 填充系列
- 仅填充格式
- 不带格式填充
- 填补天数
- 填写工作日
- 填写月份
- 填写年份
我究竟做错了什么?
谢谢
答案1
我可以编写一个 Excel 宏来实现这一点:
Sub AddEntry()
yr = "2012"
x = ActiveCell.Row
y = ActiveCell.Column
For mon = 6 To 12
Cells(x, y) = "01/" + CStr(mon) + "/" + yr
Cells(x + 1, y) = "15/" + CStr(mon) + "/" + yr
x = x + 2
Cells(x, y).Select
Next mon
End Sub
我实际上用这个来查看是否正确设置了格式,注意单引号。但是这会将条目从日期更改为字符串。
Cells(x, y) = "'01/" + CStr(mon) + "/" + yr
Cells(x + 1, y) = "'15/" + CStr(mon) + "/" + yr
答案2
您需要使用一些简单的功能。
- 首先,添加前两个日期 01/06/2012、15/06/2012
- 在第三个单元格中添加以下公式:
=DATE(YEAR($A1),MONTH($A1) + 1, DAY($A1))
- 向下拖动第三个单元格。
就是这样。