更改特定拆分视图的视图

Question

我希望我的Excel工作表中有一个拆分（垂直），确保屏幕左侧有一组控件可以方便地访问。目前我使用此代码根据我在A列中的标题列表选择并移动到单元格。

Option Explicit
Dim trimProcess() As String

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim i As Integer
    If Not Intersect(ActiveCell, Range("A6:A1000")) Is Nothing Then
        If ActiveCell.Value <> "" Then
            For i = 0 To UBound(trimProcess)
                If ActiveCell.Value = trimProcess(i) Then
                    Cells(4, 4 * (i + 1)).Select
                    Cells(4, 4 * (i + 1)).Activate
                End If
            Next
        End If
    End If
End Sub

这适用于我需要的，但它只适用于活动拆分视图IE如果我单击左侧拆分中的A中的单元格，它会移动左侧拆分视图。我想要它，以便只更改正确的视图，但无法找到代码这样做。这可能吗？