Exécuter une chaîne en tant que codeRésolu

Question

Bonjour,  j'ai un formulaire dans lequel se trouvent plusieurs contrôles : 
CB1 à CB10

Sur tous ces contrôles je voudrais changer la propriété caption.
Exemple : CB1.caption="TEST" puis CB2.caption="TEST" et ainsi de suite jusqu'à 10.

Je voudrais le faire avec une boucle FOR NEXT
for x = 1 to 10
    m="CB" & ltrim(str(x)) & ".caption='TEST'"
next x
Comment faire pour exécuter la chaîne m : "CB1.CAPTION='test'" ?

D'avance merci pour votre aide.
Mario

cs_casy · Accepted Answer

En fait dans ton cas, il ne faut pas vouloir "executer" une quelqconue chaine, il faut acceder directement au controle pour pouvoir changer sa propriété.

Le mieux aurait été que tu fasse un groupe de controle, ça aurait été plus simple.

Ceci-dit tu peux tout de même acceder à chaque controle avec un index, en passant par la collections Controls, qui est la collection des controles posés sur ta feuille :

Dim i As Integer
For i =   1 To 10
  Me.Controls("CB" & i).Caption = "TEST"
Next

, ----
[code.aspx?ID=41455 By Renfield]

  ---- Sevyc64  (alias Casy) ----  <hr size  ="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

dakota77 · Answer

Cela fonctionne !

Un grand merci à toi.
Mario

EdBsb · Answer

ça faisait plusieurs jours que je cherchais !  

Je teste dès demain.

merci Casy.

Exécuter une chaîne en tant que code

3 réponses

Votre réponse

Discussions similaires