ActiveX element met variabele (min/Max) input

[lemonstreet25]

Kenners,

Is er een oplossing om het volgende te bereiken:

Het ActiveX element in bijgevoegd voorbeeld kan variëren tussen 0 en 100; dat heb ik moeten definiëren in de eigenschappen. Is het mogelijk om het element gebruikt te laten maken
van de cellen H6 en H11 als input van min/max velden en aldus het element met variabele input te kunnen gebruiken?

Dank voor uw ideeën,

LucBekijk bijlage ActiveX vraag.xlsm

 

[VenA]

Bv zo

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("H6", "H11")) Is Nothing Then
  With Me.ScrollBar1
    .Max = [h6]
    .Min = [h11]
   End With
End If
End Sub

 

[lemonstreet25]

Meerder ActiveX elementen op sheet

VenA,

Dank!! Hoe ziet dat eruit als ik 2 van deze elementen op dezelfde sheet heb? Overigens met verschillende inputvelden?

 

[VenA]

Bv

Private Sub Worksheet_Change(ByVal Target As Range)
  Select Case Target.Address(0, 0)
    Case "H6"
      ScrollBar1.Max = [h6]
    Case "H11"
      ScrollBar1.Min = [h11]
    Case "P6"
      ScrollBar2.Max = [P6]
    Case "P11"
      ScrollBar2.Min = [P11]
  End Select
End Sub