Excel 是否有一种方法可以基于不同工作表中的多个单元格更新单元格值?
我在四张不同的表格中有四个不同的单元格,通过下拉列表,它们都可以是不同的值。第五页中的单元格是否可以作为最近更改的单元格的值 以上是期望结果的一个快速示例。另一张表中的cell5val是其他四个单元格中任何一个的最新更新值 是,在前4张工作表中放置一个工作表更改事件,将目标值写入5ᵗʰ关于变更的工作表。因此,表5将始终显示4张表中任何一张的最新更改值Excel 是否有一种方法可以基于不同工作表中的多个单元格更新单元格值?,excel,vba,Excel,Vba,我在四张不同的表格中有四个不同的单元格,通过下拉列表,它们都可以是不同的值。第五页中的单元格是否可以作为最近更改的单元格的值 以上是期望结果的一个快速示例。另一张表中的cell5val是其他四个单元格中任何一个的最新更新值 是,在前4张工作表中放置一个工作表更改事件,将目标值写入5ᵗʰ关于变更的工作表。因此,表5将始终显示4张表中任何一张的最新更改值 Option Explicit Private Sub Worksheet_Change(ByVal Target As Range)
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim AffectedRng As Range
Set AffectedRng = Intersect(Target, Target.Parent.Range("A1:A10")) 'this is the range you want to observe
If Not AffectedRng Is Nothing Then
Worksheets("Sheet5").Range(AffectedRng.Address).Value = AffectedRng.Value
End If
End Sub
在4张纸中的每一张纸上都写上如下内容
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim AffectedRng As Range
Set AffectedRng = Intersect(Target, Target.Parent.Range("A1:A10")) 'this is the range you want to observe
If Not AffectedRng Is Nothing Then
Worksheets("Sheet5").Range(AffectedRng.Address).Value = AffectedRng.Value
End If
End Sub
是,在前4个工作表中放置一个工作表\u更改事件,将目标值写入5ᵗʰ关于变更的工作表。因此,表5将始终显示4张表中任何一张的最新更改值。@Pᴇʜ感谢您为我指明了正确的方向,这将完美地解决我的问题。