A洪鑫:
您所提到的表格1和表格2是指在同一张工作表中的两个区域还是两个相对独立的表格,如果是前者,可以使用Worksheet_SelectionChange事件来实现。以下是具体代码:```vbnetPrivateSubWorksheet_SelectionChange(ByValTargetAsRange)Dimrng1AsRange,rng2AsRange,ranAsRangeSetrng1=Range('B2:F10')Setrng2=Range('H2:L10')ForEachranInrng1....