Excel:如何根据单元格值更改的时间创建历史数据
我正在Excel中处理一个项目: 首先,我有一个单元格,它的值每天都在变化。 每天当这个单元格发生变化时,我希望它报告当天的值及其相应的日期 因此,我创建了两行=日期和值 我想让它在每次单元格值改变时都创建新的列 例如,今天这个单元格的值是10 然后,这将创建一个新列,其值为todays date和10。 明天单元格的值是12。 这将创建一个新列,其中日期为明天,值为12 因此,这将是一个历史性的时间框架,我可以回顾每一天的价值。 此外,我无法预测单元格的未来值,因此它必须根据每天显示的当前值创建新列 提前感谢:)Excel:如何根据单元格值更改的时间创建历史数据,excel,portfolio,Excel,Portfolio,我正在Excel中处理一个项目: 首先,我有一个单元格,它的值每天都在变化。 每天当这个单元格发生变化时,我希望它报告当天的值及其相应的日期 因此,我创建了两行=日期和值 我想让它在每次单元格值改变时都创建新的列 例如,今天这个单元格的值是10 然后,这将创建一个新列,其值为todays date和10。 明天单元格的值是12。 这将创建一个新列,其中日期为明天,值为12 因此,这将是一个历史性的时间框架,我可以回顾每一天的价值。 此外,我无法预测单元格的未来值,因此它必须根据每天显示的当前值创
尝试查看youtube视频并在google上搜索类似问题,但没有成功。尝试将此代码插入工作表代码:
Option Explicit
Private Sub Worksheet_Change(ByVal rngTarget As Range)
Dim rngValue As Range: Set rngValue = Me.Range("B2")
Dim rngDateValue As Range: Set rngDateValue = rngValue.Offset(-1, 0).Resize(2, 1)
Dim rngNew As Range: Set rngNew = rngDateValue.Offset(0, 1)
If Not Intersect(rngTarget, rngValue) Is Nothing Then
rngNew.Insert xlShiftToRight, xlFormatFromLeftOrAbove
Set rngNew = rngDateValue.Offset(0, 1) ' Restore modification caused by Insert
rngNew.Value = rngDateValue.Value
End If
End Sub
我假设您要保存的值在B2中,以及它上面的相应日期,如图所示:
它是如何变化的?您是否手动覆盖它?