如果对行中的任何单元格进行任何更改,如何将值设置为单元格?

时间:2014-06-30 10:41:11

标签: excel excel-formula updates

我想知道如果更改或删除任何单元格值,如何设置单元格的值(在我的方案中它是行中的最后一个单元格)。

我希望这样一种方式,当用户更改/删除相应行中任何单元格的值时,最后一个单元格应该具有" TRUE"值相同的时刻。(在更简单的术语中更改excel行中的指示符)

我试过跟踪'选项但无法找到任何条件将读取它并将最后一个单元格标记为" TRUE"在保存文件之前。

1 个答案:

答案 0 :(得分:0)

在工作表上添加事件:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim x As Long

    If Target.Column < 10 Then
        x = Target.Row
        Range("A1").Offset(x, 10).Value = True
    End If
End Sub

考虑到该行的最后一列是10 之后,如果要创建某些内容,请在Workbook事件中添加代码:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)