设置Spread Sheet 选择模式,普通OR单行

Public Sub SetSpreadStyle(AnySs As vaSpread, aFlg As Boolean)

    With AnySs
        If aFlg = True Then
            .AutoClipboard = False
            .EditModePermanent = False
            .OperationMode = OperationModeSingle
            .ProcessTab = False
            .ScrollBarExtMode = True
        Else
            .AutoClipboard = True
            .EditModePermanent = True
            .OperationMode = OperationModeNormal
            .ProcessTab = True
            .ScrollBarExtMode = False
        End If
    End With

End Sub