VBA Controls() auf MultiPage anwenden
23.02.2017 11:11:30
Henning
folgendes Problem, bei dem Ihr mir hoffentlich helfen könnt:
Ich habe eine Userform mit einer Multipage (streng genommen sogar zwei), und je nachdem, ob ein bestimmter Haken in einer CheckBox gesetzt ist, soll eine Seite ein- oder ausgeblendet werden. Realisiert werden kann das Ganze über in diesem Fall
MultiPage2.Pages(0).Enabled = False
Ich würde das ganze aber gerne flexibel über eine Funktion machen, der ich als Argument den Namen der einzublendenden Page als String übergebe.
Privat Sub aktivieren(s as String)
Controls(s).Enabled = False
End Sub
Das ganze natürlich noch mit Fehler/If-Abfrage, aber vom Grundprinzip her so.
Schreibe ich nun in s
s="MultiPage2.Pages(0)"
s="MultiPage2"
Herzlichen Dank und beste Grüße,
Henning