Boucle avec variable en référence
Résolu
aminesc
Messages postés
70
Date d'inscription
Statut
Membre
Dernière intervention
-
aminesc Messages postés 70 Date d'inscription Statut Membre Dernière intervention -
aminesc Messages postés 70 Date d'inscription Statut Membre Dernière intervention -
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 :
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
A voir également:
- Boucle avec variable en référence
- Reference pto - Accueil - Box & Connexion Internet
- Impossible de créer le fichier de travail. vérifiez la variable d'environnement temp ✓ - Forum Word
- Le fichier contient un programme écrit en python. le programme construit un mot secret mais il ne l'affiche pas. modifiez ce programme afin que à chaque itération de la boucle : la variable a augmente de 2 la variable b diminue de 1 ajoutez une instruction pour faire afficher le mot secret construit. quel est ce mot secret ? ✓ - Forum Python
- Xiaomi s'éteint tout seul et se rallume en boucle - Forum Xiaomi
- Indice de référence des loyers - Guide
1 réponse
Bonjour Aminesc, bonjour le forum,
Essaie comme ça :
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
Merci beaucoup