Boucle
Résolu
abdellah_tadjine
Messages postés
191
Date d'inscription
Statut
Membre
Dernière intervention
-
fabien25000 Messages postés 673 Date d'inscription Statut Membre Dernière intervention -
fabien25000 Messages postés 673 Date d'inscription Statut Membre Dernière intervention -
2 réponses
Bonjour,
quel VB?
quel VB?
- VBS
- VBA -> précisez:
- Word
- Excel
- Access
- Powerpoint
- Autre
- VB6 (ou antérieur, précisez)
- VB.Net - précisez la Framework et ->
- Winform
- WPF
abdellah_tadjine
Messages postés
191
Date d'inscription
Statut
Membre
Dernière intervention
6
ah!! désolé j'utilise VBA excel......merci
Bonjour,
pour excel vba:
pour excel vba:
Private Sub UserForm_Initialize()
Dim i As Integer
i = 1
For i = 1 To 6
Set obj = Me.Controls("TextBox" & i)
obj.Value = ""
Next i
End Sub
Bonjour fabien25000,
Quelques petites précisions :
a) La ligne #3 est inutile : pas besoin d'initialiser i à 1
puisque c'est fait par la ligne #5 : For i = 1 To 6
b) C'est inutile aussi de passer par obj, on peut faire directement :
For i = 1 To 6
Controls("TextBox" & i).Text = ""
Next i
Tu auras noté que j'utilise .Text au lieu de .Value
Cordialement
Bonjour stéphane et Merci.
je débute dans vba excel et j'ai tâtonné pour arriver à ce code.
j'ai rajouté la ligne 3 parce qu'en déboguant j'ai eu l'impression qu'il commençait à 0
pourquoi .text plutot que .value?
je tente de continuer à apprendre grâce aux problèmes postés ici et je me risque de temps à autres à proposer une réponse, en espérant ne pas "déranger"..
je débute dans vba excel et j'ai tâtonné pour arriver à ce code.
j'ai rajouté la ligne 3 parce qu'en déboguant j'ai eu l'impression qu'il commençait à 0
pourquoi .text plutot que .value?
je tente de continuer à apprendre grâce aux problèmes postés ici et je me risque de temps à autres à proposer une réponse, en espérant ne pas "déranger"..