我如何使两个单元彼此依赖而没有循环错误？

在Excel 2013中，我有单元格A1，A2和A3以及B1，B2和B3。 A列是年度计算，B列是每周计算。

例如，如果用户更新A1（例如5200 ），我想自动更新B1（例如100 ）。 如果用户更新B1（例如50 ），我想自动更新A1（例如， 2600 ）。 对于A2-B2和A3-B3也是如此。

当我试图监视这两个，它创build一个循环问题和Excel崩溃。

Answer 1

那么不要使用公式。 像这样使用_Change事件：

 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub If Intersect(Target, Range("A:B")) Is Nothing Then Exit Sub Application.EnableEvents = False 'Prevent infinite looping If Target.Column = 1 Then 'User has changed something in column A: Target.Offset(0, 1).Value = Target / 52 Else 'User has changed something in column B: Target.Offset(0, -1).Value = Target * 52 End If Application.EnableEvents = True End Sub