Test of optionbutton bestaat

[rudyV]

Geachte forum,

Ik probeer te bepalen of een optionbutton überhaupt bestaat.
De optionbuttons naam is bepaald door i, waaraan telkens een andere waarde wordt meegegeven. Bijvoorbeeld: als i=1 dan betreft het object Opt1 etc.
Bij het klikken op de optionbutton wordt - onder meer - gekeken naar de volgende button, dus Opt2. Maar er is bij de laatste button altijd een klik waar de button i+1 niet bestaat.

If Not Me.Controls(csBTN_NAME & i + 1) Is Nothing Then

Echter, nu is vastgesteld dat het object wel bestaat, geeft het systeem geeft toch een melding dat het "het opgegeven object niet kan vinden".
Ik snap er niets van. Wat doe ik verkeerd?

Vriendelijke groet,

Ruud.

 

[emields]

lees dit eens

https://www.helpmij.nl/forum/forumdisplay.php/5-Excel

 

[rudyV]

Hallo emields,

Bedoel je met je bericht dat ik beter een voorbeeldbestand bij kan voegen?
Het uitkleden van mijn workbook is veel werk. In principe niet erg, maar ik denk niet dat het iets toevoegt of verduidelijkt aan de vraag.

Of bedoel je misschien dat ik /code moet gebruiken i.p.v. /HTML? In dat geval: I stand corrected

Anders snap ik weet iets niet.

Groet, Ruud.

 

[edmoor]

Een leeg document met alleen de betreffende userform is voldoende.

 

[rudyV]

Bij deze

 

[edmoor]

Maak deze functie er eens bij:

Function btnExists(btnName As String) As Boolean
     btnExists = False
    On Local Error GoTo Einde
    If Me.Controls(btnName).Name <> "" Then
        btnExists = True
    End If
Einde:
End Function

En doe dan deze controle:
If btnExists(csBTN_NAME & i + 1) Then

 

[rudyV]

Thanks Edmoor,

Precies wat ik graag wilde.
Ik stel het erg op prijs

Groet, Ruud