AfterScroll
滚动表后执行。
..........
Tables("表B").ScrollPosition = e.Table.ScrollPosition
如果要求垂直方向同步滚动,水平方向不同步滚动,代码为:
Dim p As Point = Tables("表B").ScrollPosition
p.Y = e.Table.ScrollPosition.Y
Tables("表B").ScrollPosition = p帮助中的上述代码,好像不听使唤呢? 滚动位置有差异。