Discussion :

[b.billet85]

Bonjour,

j'ai un petit problème sur vba access

J'ai des champs textes intitulés : ABG1, ABG2,ABG3, .... , AGBG12
Ce que j'aimerais faire c'est créer une boucle While pour remplir chacun de ces champs car leur programmation casiment identiques

Ex ce que je fait aujourd'hui et c'est long:

Dim A as integer

A = 1

Me.ABG1.value = A
A = A+1
Me.ABG1.value = A
A= A+1
....
Me.ABG12.value = A

Maintenant, ce que j'aimerais faire et qui ne marche pas

Dim A as integer
Dim X as integer

A=1
X=1

While x<13
"Me.ABG" & X & ".value" = A
A = A+1
Wend

En faite j'aimerais concaténer une variable et je n'y arrives pas et je n'ai pas trouvé de sujet comme celui là sur le forum

Merci de me dire si vous avez une solution

[Tofalu]

Une recherche dans la FAQ aurait amener directement la réponse :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.Controls("ABG" & x).value=

[fgiambelluco]

Bonjour

While x<13
"Me.ABG" & X & ".value" = A
A = A+1
Wend

Attention, tu fais varier le A et tu test le X