怎么让excel自动输入一列的日期

要让Excel自动输入一列的日期，可以使用填充句柄、公式、VBA宏、Power Query等方法，其中最常用的方法有：使用填充句柄、使用公式、使用VBA宏。 使用填充句柄的方法是最简单和直观的，而使用公式和VBA宏的方法则在自动化和灵活性方面更具优势。下面详细介绍使用填充句柄的方法：

填充句柄：这是最简单的方法，只需在Excel中输入开始日期，然后使用填充句柄拖动以自动生成后续日期。具体步骤如下：

在Excel工作表中的第一个单元格中输入开始日期。
点击并拖动单元格右下角的小黑方块（即填充句柄）向下拖动，直到覆盖所需的日期范围。
Excel会自动填充连续的日期。

接下来，将详细介绍其他方法，包括使用公式和VBA宏来实现更复杂的日期输入需求。

一、使用公式

1.1、使用简单的递增公式

如果你希望日期按天递增，可以使用公式来实现。假设你的开始日期在A1单元格，你可以在A2单元格中输入公式 =A1+1，然后将公式向下拖动以填充其他单元格。这种方法可以自动生成连续递增的日期。

1.2、使用SEQUENCE函数

Excel 365和Excel 2019版本中引入了SEQUENCE函数，可以生成一个序列。假设你希望在A列中生成从2023年1月1日开始的30天日期序列，可以在A1单元格中输入公式 =SEQUENCE(30, 1, "2023-01-01", 1)。这个公式将生成一个从2023年1月1日开始的30天日期序列。

1.3、使用WORKDAY函数

如果你希望生成排除周末和假期的工作日日期，可以使用WORKDAY函数。假设你的开始日期在A1单元格，可以在A2单元格中输入公式 =WORKDAY(A1, 1)，然后将公式向下拖动以填充其他单元格。你还可以在公式中添加假期列表，以排除假期。

二、使用VBA宏

2.1、创建简单的日期递增宏

如果你希望自动填充日期并且不介意编写一些代码，可以使用VBA宏。以下是一个简单的VBA宏示例，它将在A列中从指定的开始日期开始填充连续的日期。

Sub FillDates()
    Dim startDate As Date
    Dim cell As Range
    Dim i As Integer
    ' 设置开始日期
    startDate = DateValue("2023-01-01")
    ' 从A1单元格开始填充日期
    Set cell = Range("A1")
    ' 填充100个连续日期
    For i = 0 To 99
        cell.Offset(i, 0).Value = startDate + i
    Next i
End Sub

这个宏将从2023年1月1日开始，在A列中填充100个连续的日期。你可以根据需要调整开始日期和填充的日期数量。

2.2、创建工作日日期递增宏

如果你希望生成排除周末和假期的工作日日期，可以使用以下VBA宏示例。假设假期日期在B列中。

Sub FillWorkdays()
    Dim startDate As Date
    Dim cell As Range
    Dim i As Integer
    Dim holidays As Range
    ' 设置开始日期
    startDate = DateValue("2023-01-01")
    ' 设置假期范围
    Set holidays = Range("B1:B10")
    ' 从A1单元格开始填充日期
    Set cell = Range("A1")
    ' 填充100个工作日日期
    For i = 0 To 99
        cell.Offset(i, 0).Value = WorksheetFunction.WorkDay(startDate, i, holidays)
    Next i
End Sub

这个宏将在A列中填充100个排除周末和假期的工作日日期。你可以根据需要调整开始日期、假期范围和填充的日期数量。

三、使用Power Query

3.1、创建日期序列

Power Query是Excel中的一个强大工具，可以用于数据转换和处理。你可以使用Power Query生成日期序列，并将其加载到工作表中。以下是具体步骤：

打开Excel并选择一个空工作表。
选择 数据 > 从其他来源 > 空白查询。
在Power Query编辑器中，选择 高级编辑器。
输入以下M代码以生成日期序列：

let
    StartDate = #date(2023, 1, 1),
    EndDate = #date(2023, 12, 31),
    DatesList = List.Dates(StartDate, Duration.Days(EndDate - StartDate) + 1, #duration(1, 0, 0, 0)),
    TableDates = Table.FromList(DatesList, Splitter.SplitByNothing(), {"Date"})
in
    TableDates

选择 关闭并加载 以将日期序列加载到工作表中。

这个方法将生成一个从2023年1月1日到2023年12月31日的日期序列，并将其加载到工作表中。

3.2、生成工作日日期序列

你还可以使用Power Query生成排除周末和假期的工作日日期序列。以下是具体步骤：

打开Excel并选择一个空工作表。
选择 数据 > 从其他来源 > 空白查询。
在Power Query编辑器中，选择 高级编辑器。
输入以下M代码以生成工作日日期序列：

let
    StartDate = #date(2023, 1, 1),
    EndDate = #date(2023, 12, 31),
    Holidays = {#date(2023, 1, 1), #date(2023, 12, 25)},
    DatesList = List.Dates(StartDate, Duration.Days(EndDate - StartDate) + 1, #duration(1, 0, 0, 0)),
    FilteredDates = List.Select(DatesList, each Date.DayOfWeek(_, Day.Saturday) <> 0 and Date.DayOfWeek(_, Day.Sunday) <> 0 and List.Contains(Holidays, _) = false),
    TableDates = Table.FromList(FilteredDates, Splitter.SplitByNothing(), {"Date"})
in
    TableDates

选择 关闭并加载 以将工作日日期序列加载到工作表中。

这个方法将生成一个排除周末和假期的工作日日期序列，并将其加载到工作表中。

四、使用Excel自定义功能

4.1、自定义填充序列

Excel允许你创建自定义填充序列，以便在工作表中自动填充日期。以下是具体步骤：

输入开始日期和结束日期到单独的单元格中，例如在A1和A2单元格中输入。
选择 文件 > 选项。
在Excel选项对话框中，选择 高级。
向下滚动到 常规 部分，点击 编辑自定义列表。
在 自定义列表 对话框中，选择 导入。
选择你输入日期的单元格范围，然后点击 导入。
点击 确定 以保存自定义列表。

现在你可以使用自定义列表来自动填充日期。只需在单元格中输入自定义列表中的第一个日期，然后使用填充句柄向下拖动即可。

4.2、使用命名范围

你还可以使用命名范围来自动填充日期。以下是具体步骤：

输入开始日期和结束日期到单独的单元格中，例如在A1和A2单元格中输入。
选择 公式 > 定义名称。
在 名称 框中输入一个名称，例如 DateRange。
在 引用位置 框中输入公式 =A1:A100，然后点击 确定。

现在你可以在公式中使用命名范围来自动填充日期。例如，你可以在B1单元格中输入公式 =INDEX(DateRange, ROW(A1))，然后将公式向下拖动以填充其他单元格。

通过以上方法，你可以根据需要在Excel中自动输入一列的日期。无论是简单的填充句柄、公式，还是更复杂的VBA宏和Power Query，每种方法都有其独特的优势和适用场景。选择最适合你需求的方法，可以大大提高工作效率。