Verrouiller textbox en boucle

Bonjour,

Je cherche à verrouiller en boucle plusieurs textbox afin d'éviter de les lister. Cela rendra le code plus agréable aussi...

    TextBox1.Locked = True
    TextBox2.Locked = True
    TextBox3.Locked = True
    TextBox4.Locked = True
    TextBox5.Locked = True
    TextBox6.Locked = True
    TextBox7.Locked = True
    TextBox8.Locked = True
    TextBox22.Locked = True
    TextBox23.Locked = True
    TextBox24.Locked = True
    TextBox25.Locked = True
    TextBox26.Locked = True
    TextBox27.Locked = True
    TextBox28.Locked = True
    TextBox29.Locked = True
    TextBox30.Locked = True
    TextBox31.Locked = True
    TextBox32.Locked = True
    TextBox33.Locked = True
    TextBox34.Locked = True

    TextBox1.Enabled = False
    '.....
    '.....
    OptionButton1.Locked = True
    OptionButton2.Locked = True
    OptionButton3.Locked = True
    OptionButton4.Locked = True
    OptionButton5.Locked = True
    OptionButton6.Locked = True
    OptionButton7.Locked = True
    OptionButton8.Locked = True
    OptionButton9.Locked = True
    OptionButton10.Locked = True
    OptionButton11.Locked = True
    OptionButton12.Locked = True
    OptionButton13.Locked = True
    OptionButton14.Locked = True
    OptionButton15.Locked = True
    OptionButton16.Locked = True
    OptionButton17.Locked = True
    OptionButton18.Locked = True

Comment procéder svp car par ex je pensais écrire pour les textbox de 1 à 8 mais cela génère une erreur:

For i =1 to 8
Textbox&i.Locked=true
textbox&i.Enabled=False
next i

Merci pour votre retour :)

JB

Bonjour,

Une petite recherche avec notre ami Google
https://www.google.com/search?q=vba+boucle+sur+des+controles

Vous aurai permis de trouver ceci (la base)
https://forum.excel-pratique.com/excel/boucle-sur-les-controls-checkbox-112425

Bonjour,

Pardon, j'avais essayé cette manip mais j'ai oublié de mettre Textbox entre " "

Je m'en excuse, je clos le sujet (redondant) pour le coup...

Merci BrunoM45

Rechercher des sujets similaires à "verrouiller textbox boucle"