Ik heb een mooi userform gemaakt met een aantal optionbuttons, maar die wil ik nu voortaan dynamisch gaan laden (ik lees het aantal opties uit het bestand en dan kan ik volledig dynamisch de objecten aanmaken). Ik kom er maar niet uit, ik heb de help door zitten werken en ik zou zweren dat ik de goede code heb maar de volgende code geeft "ongeldig gebruik van het sleutenwoord New":
De statement New al in de Dim meegeven werkt ook niet, dan krijg ik dezelfde foutmelding. Een nieuwe optionbutton aanmaken en daarnaar laten verwijzen heeft ook al niet geholpen. Ik kan wel één van de optionbuttons ernaar laten verwijzen, maar ik heb er als test even 10 nodig.
code:
1
2
3
4
5
| Dim OptFormulieren(1 To 10) As OptionButton
For x = 1 To 10
Set OptFormulieren(x) = New OptionButton
Next x |
De statement New al in de Dim meegeven werkt ook niet, dan krijg ik dezelfde foutmelding. Een nieuwe optionbutton aanmaken en daarnaar laten verwijzen heeft ook al niet geholpen. Ik kan wel één van de optionbuttons ernaar laten verwijzen, maar ik heb er als test even 10 nodig.