2014-11-19 1 views
0

최대/최소 값 엑셀에서.. 나는 최소/최대 값 내 최대 및 최소 값의 중간 지점에서 시작하는 내 스크롤 막대를 설정하려고

시작은 그래서는 다음과 같습니다

나는 (최소) 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 

이 어떻게 작동하는지 어떤 아이디어?

+0

이 코드는 이벤트에서 실행됩니다. 무슨 사건? scrollbarStart_Change 란 무엇입니까? 누락 된 코드를 게시하거나 달성하고자하는 것을 설명하십시오. – teylyn

+0

안녕하세요, 제 질문을 수정했습니다 ... 괜찮습니까? – avirus2

답변

0

Worksheet_Activate()를 사용하여 스크롤 막대 최소값을 저장하는 셀의 값을 설정하십시오. 당신의 코드에서 어떤 셀인지는 알 수 없습니다.

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