RefEdit

Résolu
ludomontbaze Messages postés 37 Date d'inscription vendredi 13 avril 2007 Statut Membre Dernière intervention 20 juin 2008 - 11 mai 2007 à 09:43
ludomontbaze Messages postés 37 Date d'inscription vendredi 13 avril 2007 Statut Membre Dernière intervention 20 juin 2008 - 11 mai 2007 à 09:55
Bonjour à tous,
je travaille sous vba et dans mon projet je veux remplir une RefEdit avec une boucle for:
For i = 1 To 3
RefEdit_detail_automate.a = "Zone " & i & ":" & vbCrLf
Next
A la fin, il n'y a que la dernière ligne: "Zone 3:"
Je n'arrive pas à afficher les 3 lignes.
HELP

4 réponses

cs_Nicko11 Messages postés 1141 Date d'inscription mercredi 7 mars 2007 Statut Membre Dernière intervention 19 septembre 2007 3
11 mai 2007 à 09:53
Salut, ca me semble logique puisque tu ecrase l'ancienne valeur (a mon sens).

RefEdit_detail_automate.text = ""

For i = 1 To 3
    RefEdit_detail_automate.text = RefEdit_detail_automate.text  & "Zone " & i & ":" & vbCrLf
Next

Cela ne serait pas mieux.
3
ludomontbaze Messages postés 37 Date d'inscription vendredi 13 avril 2007 Statut Membre Dernière intervention 20 juin 2008
11 mai 2007 à 09:45
Correction:
Le code dans la boucle for est:
RefEdit_detail_automate.text = "Zone " & i & ":" & vbCrLf
0
cs_Exploreur Messages postés 4821 Date d'inscription lundi 11 novembre 2002 Statut Membre Dernière intervention 15 novembre 2016 15
11 mai 2007 à 09:54
Salut,

C'est peut-être normal, puisque tu utilises la propriété : .Text !! Donc à chaque passe dans la boucle l'ancienne valeur est écrasée par la nouvelle....

Regarde plutôt si tu n'as pas une propriété : Add ou AddItem

RefEdit_detail_automate.Add = "Zone " & i & ":" & vbCrLf
A+
Exploreur

 
0
ludomontbaze Messages postés 37 Date d'inscription vendredi 13 avril 2007 Statut Membre Dernière intervention 20 juin 2008
11 mai 2007 à 09:55
Si en effet c'est plus logique.
Merci
0
Rejoignez-nous