1

在 Excel 2010 中,我有一个日期“01-01-2012”和一个左右箭头。

我需要应用宏或其他东西,以便日期中的天数会相应减少/增加。如何才能做到这一点?

示例:“01-03-2012”,当按下右箭头时,日期应更改为“02-03-2012”,下一次为“03-03-2012”等等..从[01-31 ] 注意,月份和年份永远不会改变。

我做了一个宏,可以改变我在录制宏时输入的固定日期的日期,但这还不够好。我需要它来添加/减去。

4

2 回答 2

3

我将日期为“theDate”的单元格命名为。Sub forSubtractDay几乎相同,DateAdd函数的第二个参数是-1。

Sub AddDay()

Dim theDate As Date
Dim newDate As Date

theDate = Sheet1.Range("theDate")

newDate = DateAdd("d", 1, theDate))

Sheet1.Range("theDate") = newDate

End Sub

请注意,这是一个快速的 VBA Sub,因为这不是我的“强项”,但它会工作......

于 2012-12-18T14:00:09.880 回答
1

这绝对可以通过 VBA 宏来完成。

在 Developer Tab -> Visual Basic 下,双击存在问题的单元格所在的工作表,然后执行以下事件:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

参数 Target 将包含选定的单元格(检查箭头之一是否是选定的单元格),然后相应地减少/增加日期值。

于 2012-12-18T13:57:57.473 回答