>

5 개의 셀에 연결된 5 개의 스피너가 연속으로 있습니다. 5 셀의 합이 특정 값에 도달하면 스피너가 작동을 멈출 수 있습니까?

즉, 다른 셀을 줄일 때까지 셀을 더 늘릴 수 없습니다.


  • 답변 # 1

    이것이 효과가 있는지 알아 보면 조금 해 키지 만 일을합니다. 그렇지 않으면 문제가 발생할 수있는 모든 단계를 따르십시오.

    워크 북에서이 코드를 새 모듈에 추가하십시오 ...

    Public Sub Spinner1Change()
        SpinnerChange "Spinner1"
    End Sub
    Public Sub Spinner2Change()
        SpinnerChange "Spinner2"
    End Sub
    Public Sub Spinner3Change()
        SpinnerChange "Spinner3"
    End Sub
    Public Sub Spinner4Change()
        SpinnerChange "Spinner4"
    End Sub
    Public Sub Spinner5Change()
        SpinnerChange "Spinner5"
    End Sub
    Sub SpinnerChange(ByVal strSpinnerName As String)
        Dim bEnabled As Boolean, strLinkedCell As String, objSheet As Worksheet
        Set objSheet = Worksheets("Sheet1")
        If Range("rngCurrentValue") > Range("rngMaxValue") Then
            strLinkedCell = objSheet.Shapes(strSpinnerName).ControlFormat.LinkedCell
            objSheet.Range(strLinkedCell) = objSheet.Range(strLinkedCell) - 1
        End If
    End Sub
    
    

    스피너가있는 워크 시트의 이름으로 "Sheet1"을 변경하십시오.

    지금 워크 시트에 ...

    .. 2 개의 명명 된 범위 생성 :

    rngCurrentValue(이 예에서는H2셀에 연결됨)

    rngMaxValue(이 예에서는D2셀에 연결됨)

    스피너를 사용하여 각각에 순차적 인 이름을 지정합니다. Spinner1, Spinner2, Spinner3 등이라고 부르고 원하는 셀에 연결합니다 ...

    D2셀에 표시된대로 최대 값을 입력 한 다음 회전하면 마지막 회전이 이전 값으로 감소합니다.

    그러한 오류 점검은 없지만 직접 해결할 수는 있지만 공정하다고 생각합니다.

    더 나은 해결책을 찾으면 자유롭게 가져 가십시오. :-)

  • 이전 node.js - Express/MongoDb는 ID로 모든 객체를 찾아서 배열에 저장합니다
  • 다음 c++ - glm의 뷰 매트릭스에서 변환 매트릭스를 추출하는 방법이 있습니까?