如图所示,选中的表格里面有公式,但是不会自动更新数据了
点击公式菜单栏,选择计算选项
其选项在手动上
选择到自动选项上
这样所有公式就可以自动更新了
右键 工程收付款明细表 标签选择查看代码,在右侧输入以下代码即可
Private Sub Worksheet_Activate()
Dim sh As Worksheet
Dim i As Long
i = 3
With Me
.Range("e4:e84").ClearContents
End With
For Each sh In Worksheets
If sh.Name <> Me.Name Then
i = i + 1
Me.Hyperlinks.Add Anchor:=Me.Cells(i, 5), Address:="", SubAddress:="工作表" & sh.Index, _
ScreenTip:="跳转到“" & sh.Name & "”工作表", TextToDisplay:=sh.Name
End If
Next sh
End Sub
EXCEL目前能自动更新的只有采用数据关联才能实现自动更新,而数据关联只能在同一工作表进行(一个工作表里面可以容纳很多小工作表)