textbox

[sabrina64]

bonjour
alors voila j' explique mon probleme

je dispose d 'un userform
dans celui ci g 40 textbox que j ai désactivé
j'ai un i donné
je voudrais que
for j=1 to i
textbox&j.enabled= true
next j


or le textbox&j ca n existe pas.............;donc je sais pas comment le coder!!!

pourriez vous me corriger

merci

 

[Creepy]

Re : textbox

Bonsoir le Forum, Sabrina64,

Ci joint un bout de code qui fait ce que tu demandes. Il y a surement plus simple mais je n'ai pas trouvé.

Dim Ctrl As Control, Boucle As Integer
For Boucle = 1 To 8 Step 1
    For Each Ctrl In Controls
        If InStr(1, Ctrl.Name, "TextBox" & Boucle) <> 0 Then Ctrl.Enabled = True
    Next Ctrl
Next Boucle

A+

Creepy

 

[MichelXld]

Re : textbox

bonjour Sabrina, bonjour Creepy

Tu peux aussi utiliser

Dim i As Integer
    
For i = 1 To 40
    Me.Controls("TextBox" & i).Enabled = True
Next i

Bon après midi
MichelXld

 

[Creepy]

Re : textbox

RE bonjour,

Merci Michel, c'est bien ce qu'il me semblait mais je n'y arrivais pas !! Ca plantait

Peut être à cause du Me. que je n'avais pas mis !! ?? !!

A+

Creepy

 

[sabrina64]

Re : textbox

Merci beaucoup pour votre aide!!!!!!!!

c super ca marche!!!!!

bonne apres midi