Boucle avec variable en référence

Résolu/Fermé
aminesc Messages postés 70 Date d'inscription dimanche 25 octobre 2015 Statut Membre Dernière intervention 3 juillet 2017 - 28 juin 2016 à 16:52
aminesc Messages postés 70 Date d'inscription dimanche 25 octobre 2015 Statut Membre Dernière intervention 3 juillet 2017 - 29 juin 2016 à 10:47
bonjour ,
j'ai des référence dons mon userform qui se ressemble
exemple textebox comme suivant :TTC°1 , TTC°2....TTC°8,
je voulé utilise une boucle mais sa marche pas voici se que j'ai fait :
 For i = 1 To 8
     If (TTC° & i) <> 0 Then
     MsgBox TTC° & i
        Range("A" & 18 + i).Value = N° & i
        Range("D" & 18 + i).Value = F_debours° & i.Value 'ordre
        Range("H" & 18 + i).Value = TTC° & i.Value
     End If
 Next i

1 réponse

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
28 juin 2016 à 17:24
Bonjour Aminesc, bonjour le forum,

Essaie comme ça :

For i = 1 To 8
   If Me.Controls("TTC°" & i) <> 0 Then
      MsgBox Me.Controls("TTC°" & i).Value
      Range("A" & 18 + i).Value = "N°" & i
      Range("D" & 18 + i).Value = Me.Controls("F_debours°" & i).Value 'ordre
      Range("H" & 18 + i).Value = Me.Controls("TTC°" & i).Value
   End If
Next i

1
aminesc Messages postés 70 Date d'inscription dimanche 25 octobre 2015 Statut Membre Dernière intervention 3 juillet 2017
29 juin 2016 à 10:47
Bonjour ThauTheme ,

Merci beaucoup
0