Multipage

[ExcelAmateur]

Best forum,

Ik vond op het net een voorbeeld om een Formulier te maken en daar dan een paar tabbladen op te zetten.
Dat is me gelukt maar nu wil ik dus de TextBoxen lokken en dat lukt niet.

Dit probeer ik nu te gebruiken in een multipage formulier:

For Each Ctl In AdresBoek.Controls
    If TypeOf Ctl Is MSForms.TextBox Then Ctl.Locked = True
Next

In een Formulier werkt het wel maar niet met Multipage

Ik krijg op de eerste regel van de code een fout melding.
"De eigenschap of methode word niet ondersteund"

For Each Ctl In UserForm1.MultiPage1.Controls
    If TypeOf Ctl Is MSForms.TextBox Then Ctl.Locked = True
Next

Ik heb dit al geprobeerd, zonder resutaat;

For Each Ctl In MultiPage1.Controls

en dit;

For Each Ctl In Page1.Controls

Wie kan mij op weg helpen?

 

[Leotaxi]

even een kopie genomen


mvg
Leo

Use the code below to loop through only specific Controls on a specified page of a MultiPage Control. Note that Pages(0) is always the first page of any MultiPage Control.

Private Sub CommandButton1_Click()

Dim cCont As Control



    For Each cCont In Me.MultiPage1.Pages(0).Controls

        If TypeName(cCont) = "TextBox" Then

            'DO STUFF HERE

        End If

     Next cCont



End Sub

 

[ExcelAmateur]

Leotaxi,

Hartelijk bedankt voor de informatie, kon het namelijk niet vinden.

De code werkt, op naar het volgende probleem.