Question

我在excel中搜索解决方案。我的目标是在两个不同的工作表中输入一个值，但这个值是相同的，如果我们在这两个工作表中的任何一个中更改一个值，它将在第二个工作表中自动更改。所以我不能使用 =（对单元格的引用），因为它会以一种方式创建链接。

希望找到解决方案。

Answer 1

这样就可以了。如果我在Sheet1中更改单元格A1的值，则Sheet2中单元格A1的值设置为等于Sheet1中A1的值，反之亦然。

将此代码传递到VBA编辑器中的Sheet1。然后复制此代码并将其传递到Sheet2 - 将“Sheet2”更改为代码中的“Sheet1”（第15行）

Private Sub Worksheet_Change(ByVal Target As Range)

Dim Changed As Range
Dim vNew As String

Set Changed = Range("A1")

Application.ScreenUpdating = False
Application.EnableEvents = False


If Not Intersect(Target, Changed) Is Nothing Then
    vNew = Target.Value

    Worksheets("Sheet2").Range("A1") = vNew

    ActiveCell.Offset(1, 0).Select

End If

Application.ScreenUpdating = True
Application.EnableEvents = True

Set Changed = Nothing

End Sub

两个单元格在excel中输入相同

1 个答案: