excel如何相互引用

发布网友发布时间：2022-04-23 01:19

共4个回答

热心网友时间：2023-06-22 15:43

必须用VBA，

如果用公式，手动输入数字后，公式就被删除了！

右击 Sheet1 标签——查看代码，复制、粘贴以下代码

    Public bChange As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
    '以A1、B1两个单元格为例，当其中一个变动后，另一个变为同样的值。
    'bChange = True
    If Target.Row = 1 And Target.Column = 1 Then
        'A1
        If Not bChange Then
            bChange = True
            Range("B1").Value = Range("A1").Value
            bChange = False
        End If
    ElseIf Target.Row = 1 And Target.Column = 2 Then
        'B1
        If Not bChange Then
            bChange = True
            Range("A1").Value = Range("B1").Value
            bChange = False
        End If
    End If
End Sub

示例：

这个是全局变量办法实现的，也可以在设置单元格内容之前用：

Application.EnableEvents =False

更改之后再用

Application.EnableEvents =True

也可以

热心网友时间：2023-06-22 15:44

①相同工作簿不同工作表间相互引用，在引用单元格前加Sheetn!（Sheetn为被引用工作表的名称）
举例：如工作表Sheet1中的A1单元格内容等于Sheet2中单元格B2乘以5，则在Sheet1中的A1单元格中输入公式 =Sheet1!B2*5
②不同工作簿间互相引用，在引用单元格前加[Book.xlsx]Sheet!（Book为被引用工作薄名，Sheet为被引用工作表名）
举例：如工作薄”Book1“中Sheet1中的A1单元格内容等于工作薄”Book2“Sheet1中单元格B2乘以5，则在Sheet1中的A1单元格中输入公式 =[Book2.xlsx]Sheet1!$B$2*5

热心网友时间：2023-06-22 15:44

公式设置为手工计算
A=B
B=A
输入完成后刷新计算
或者使用VBA完成

热心网友时间：2023-06-22 15:45

只能写代码。公式是不存在的