如何在Excel 2013的列中的每个日期字段中添加一个月

Question

我有一列包含不同日期的日期字段。 我想为每个日期添加1个月。

所以如果我的列/行如下

A3: 1/2/2014
A4: 1/4/2014
A5: 1/10/2014
A6: 1/15/2014

无论我运行哪种公式或方法，都将更改为

A3: 2/2/2014
A4: 2/4/2014
A5: 2/10/2014
A6: 2/15/2014

Answer 1

您可以使用EDATE函数，将给定日期增加数月。

EDATE(A1, 1)

将为单元格A1中的日期添加一个月。

Answer 2

那不会做我需要做的。 我想更新现有单元以增加每个单元中的日期。 我将问题更新为（希望）更加清楚。 –斯科特33分钟前

从已删除的答案（Jerry）下的注释中（ 由于我仍然可以看到它们：p ），我想您想使用VBA。 如果是这种情况，请参见此。您需要使用DateAdd()

如果您检查Excel的帮助， DateAdd将返回一个变量（日期），其中包含已添加指定时间间隔的日期。

句法

DateAdd（间隔，数字，日期）

interval参数具有以下设置：

Setting Description
yyyy    Year
q       Quarter
m       Month
y       Day of year
d       Day
w       Weekday
ww      Week
h       Hour
n       Minute
s       Second

将此粘贴到模块中。

Sub Sample()
    Dim ws As Worksheet
    Dim lRow As Long, i As Long

    '~~> Change this to the relevant sheet
    Set ws = ThisWorkbook.Sheets("Sheet1")

    With ws
        lRow = .Range("A" & .Rows.Count).End(xlUp).Row

        For i = 3 To lRow
            .Range("A" & i).Value = DateAdd("m", 1, .Range("A" & i).Value)
        Next i
    End With
End Sub

Answer 3

由于在您的示例中，所有日期都是在一月，所以这应该起作用：在某些单元格中输入31并复制。 选择您的日期，然后选择特殊粘贴…添加。 简单但很大的缺点是，此功能仅在一年的7个月内有效！