在某些情况下,如果您具有特定的开始日期和结束日期,则可能需要在Excel中列出这两个给定日期之间的所有日期。 现在,本教程将讨论在Excel中列出两个日期之间的所有日期的方法。

通过Kutools for Excel列出两个日期之间的所有日期 好主意3


在这里,我介绍了可以在Excel中快速列出两个给定日期之间的所有日期的公式。

1.在两个单元格中键入开始日期和结束日期,在这里我将它们键入到单元格A1和A2中。 看截图:
doc-list-all-dates-two-dates-1之间的文档列表

2.然后转到单元格C1键入此公式 = A1 + 1 进入它,然后单击 输入 键。 看截图:
doc-list-all-dates-two-dates-2之间的文档列表

3.然后在单元格C2中,键入此公式 =IF($A$1+ROW(A1)>=$A$2-1,””,C1+1) 放入其中,然后将自动填充手柄向下拖动到单元格,直到出现空白单元格。 查看屏幕截图:

doc-list-all-dates-two-dates-3之间的文档列表       doc-list-all-dates-two-dates-4之间的文档列表

然后,您可以看到列中列出了两个给定日期之间的所有日期。
doc-list-all-dates-two-dates-5之间的文档列表

请注意:

在上述公式中,A1是开始日期,A2是结束日期,C1是日期范围中的第一个日期。


如果您对宏代码感兴趣,则可以使用下面的VBA在Excel中列出两个给定日期之间的所有日期。

1.在两个单元格中输入您的开始日期和结束日期,在这里我输入单元格A1和B1。 看截图:
doc-list-all-dates-two-dates-6之间的文档列表

2。 按 Alt + F11 打开钥匙 Microsoft Visual Basic应用程序 窗口。

3。 然后点击 插页 > 模块 并将以下VBA代码复制并粘贴到弹出窗口中 模块 窗口。

VBA:列出两个日期之间的所有日期。

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

Sub WriteDates()

    

    Dim rng As Range

    Dim StartRng As Range

    Dim EndRng As Range

    Dim OutRng As Range

    Dim StartValue As Variant

    Dim EndValue As Variant

    xTitleId     = "KutoolsforExcel"

    Set StartRng = Application.Selection

    Set StartRng = Application.InputBox("Start Range (single cell):", xTitleId, StartRng.Address, Type: = 8)

    Set EndRng   = Application.InputBox("End Range (single cell):", xTitleId, Type: = 8)

    Set OutRng   = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)

    Set OutRng   = OutRng.Range("A1")

    StartValue   = StartRng.Range("A1").Value

    EndValue     = EndRng.Range("A1").Value

    If EndValue - StartValue <= 0 Then

        Exit Sub

        End If

        ColIndex = 0

        For i = StartValue To EndValue

            OutRng.Offset(ColIndex, 0) = i

            ColIndex = ColIndex + 1

        Next

    End Sub

4。 点击 运行 or F5 运行VBA,并弹出一个对话框供您选择开始日期,然后单击 OK,然后在第二个弹出对话框中选择结束日期。 看截图:

doc-list-all-dates-two-dates-7之间的文档列表          doc-list-all-dates-two-dates-8之间的文档列表

5。 点击 OK,然后选择一个单元格以显示日期,然后单击 OK。 现在,您可以看到列出了两个日期之间的所有日期。 查看屏幕截图:

doc-list-all-dates-two-dates-9之间的文档列表         doc-list-all-dates-two-dates-10之间的文档列表

备注:此VBA生成的列表包括开始日期和结束日期。


实际上,如果您安装了 Kutools for Excel –方便的添加工具,您也可以使用 插入随机数据 解决这个问题。

免费安装 Kutools for Excel,请执行以下操作:

1.选择要在两个日期之间列出日期的列,然后单击 库工具 > 插页 > 插入随机数据。 看截图:
doc插入随机数据1

2.然后在 插入随机数据 对话框中,单击 日期 标签,然后从中选择开始和结束日期 以及 To列出,然后记得检查 工作日, 周末 以及 独特价值 复选框。 看截图:
doc-list-all-dates-two-dates-12之间的文档列表

3。 点击 Ok 关闭对话框,另一个 Kutools for Excel 对话框弹出,只需单击 。 然后,您可以看到列出了开始日期和结束日期之间的日期。 查看屏幕截图:

doc-list-all-dates-two-dates-13之间的文档列表           doc-list-all-dates-two-dates-14之间的文档列表

4.现在,您需要按所需顺序对日期列表进行排序。 请点击 数据 > 从最旧到最新排序。 然后,您可以看到日期从最早的日期到最新的日期排序。 查看屏幕截图:

doc-list-all-dates-two-dates-15之间的文档列表          doc-list-all-dates-two-dates-16之间的文档列表

插入随机数据 实用程序中,您还可以插入随机整数,随机字符串和随机时间等。 单击此处以了解有关插入随机数据的更多信息。


相关文章:



最佳办公效率工具

Kutools for Excel解决了您的大多数问题,并使您的生产率提高了80%

  • 重用: 快速插入 复杂的公式,图表 以及您以前使用过的任何东西; 加密单元 带密码 创建邮件列表 并发送电子邮件…
  • 超级公式栏 (轻松编辑多行文本和公式); 阅读版式 (轻松读取和编辑大量单元格); 粘贴到过滤范围
  • 合并单元格/行/列 不会丢失数据; 拆分单元格内容; 合并重复的行/列…防止细胞重复; 比较范围
  • 选择重复或唯一 行; 选择空白行 (所有单元格都是空的); 超级查找和模糊查找 在许多工作簿中; 随机选择…
  • 确切的副本 多个单元格,无需更改公式参考; 自动创建参考 到多张纸; 插入项目符号,复选框等…
  • 提取文字,添加文本,按位置删除, 删除空间; 创建和打印分页小计; 在单元格内容和注释之间转换
  • 超级滤镜 (将过滤方案保存并应用于其他工作表); 高级排序 按月/周/日,频率及更多; 特殊过滤器 用粗体,斜体…
  • 结合工作簿和工作表; 根据关键列合并表; 将数据分割成多个工作表; 批量转换xls,xlsx和PDF
  • 超过300种强大功能。 支持Office / Excel 2007-2019和365。支持所有语言。 在您的企业或组织中轻松部署。 完整功能30天免费试用。 60天退款保证。

kte选项卡201905


Office选项卡为Office带来了选项卡式界面,使您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!

officetab底部

Oh 游读者 👋
It’s nice to meet you.

每周三,您都将收到一封内容详实的Newsletter.

close

Oh 游读者 👋
It’s nice to meet you.

每周三,您都将收到一封内容详实的Newsletter.