从最大值/最小值 Excel 开始答案

【问题标题】：Starting at Max/Min Value Excel从最大值/最小值 Excel 开始
【发布时间】：2015-01-16 10:35:04
【问题描述】：

我正在尝试将滚动条设置为从最小值/最大值以及最大值和最小值的中点开始..

所以它看起来像这样：

我有两个值范围，从（最小值）1 到（最大值）2。我创建了一个滚动条，允许我在 1 到 2 之间的范围内。所以每次单击滚动条时，它都会从 1.1 增加, 1.2,1.3 .. 2.0。但是，我希望每次打开电子表格时滚动条从最大值或 1.5 开始。

我有这个代码：

Private Sub scollbarStart_Change()
    Range("E2") = CSng(scrollbarStart.Value/100)
End Sub

Private Sub scrollbarStart_Scroll()
    scrollbarStart_Change
End Sub 

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Not (Intersect(Target,Range("E2:E2")) Is Nothing Then

    scrollbarStart.Min = Value(Range("C2")) *100
    scrollbarStart.Max = Value(Range("F2")) *100
    scrollbarStart_Change

    End If
End Sub

有什么想法吗？

【问题讨论】：

此代码在事件中运行。什么活动？ scrollbarStart_Change 是什么？发布缺少的代码或解释您想要实现的目标。
嗨，我已经编辑了我的问题...可以吗？

标签： excel vba

【解决方案1】：

使用 Worksheet_Activate() 设置存储滚动条最小值的单元格的值。我无法从您的代码中分辨出是哪个单元格。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Range("A1") = 15  ' or whatever number you want in there.
End Sub

【讨论】：