Je souhaite passer le nom d'un objet dans une variable. Voici mon exemple:
For I = 1 To 100
nom_case = "CheckBox" & I
hauteur = Sheets(1).nom_case.Top
MsgBox hauteur
Next I
Ceci me renvois l'erreur 438 (Propriété ou méthode non gérée par cet objet).
D'aprés ce que je peux comprendre vba ne remplace pas nom_case par son
contenu (CheckBox1, CheckBox2, ...).
Quelqu'un aurait il une idée a me soumettre?
D'avance merci pour vos réponses
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JLuc
FredPaqu avait soumis l'idée :
Bonjour,
Je souhaite passer le nom d'un objet dans une variable. Voici mon exemple:
For I = 1 To 100 nom_case = "CheckBox" & I hauteur = Sheets(1).nom_case.Top MsgBox hauteur Next I
Ceci me renvois l'erreur 438 (Propriété ou méthode non gérée par cet objet). D'aprés ce que je peux comprendre vba ne remplace pas nom_case par son contenu (CheckBox1, CheckBox2, ...). Quelqu'un aurait il une idée a me soumettre? D'avance merci pour vos réponses
Cest quelque chose du type : Sheets(1).DrawingObject(nom_case).top Je crois... :oÞ
-- JLuc
FredPaqu avait soumis l'idée :
Bonjour,
Je souhaite passer le nom d'un objet dans une variable. Voici mon exemple:
For I = 1 To 100
nom_case = "CheckBox" & I
hauteur = Sheets(1).nom_case.Top
MsgBox hauteur
Next I
Ceci me renvois l'erreur 438 (Propriété ou méthode non gérée par cet objet).
D'aprés ce que je peux comprendre vba ne remplace pas nom_case par son
contenu (CheckBox1, CheckBox2, ...).
Quelqu'un aurait il une idée a me soumettre?
D'avance merci pour vos réponses
Cest quelque chose du type :
Sheets(1).DrawingObject(nom_case).top
Je crois... :oÞ
Je souhaite passer le nom d'un objet dans une variable. Voici mon exemple:
For I = 1 To 100 nom_case = "CheckBox" & I hauteur = Sheets(1).nom_case.Top MsgBox hauteur Next I
Ceci me renvois l'erreur 438 (Propriété ou méthode non gérée par cet objet). D'aprés ce que je peux comprendre vba ne remplace pas nom_case par son contenu (CheckBox1, CheckBox2, ...). Quelqu'un aurait il une idée a me soumettre? D'avance merci pour vos réponses
Cest quelque chose du type : Sheets(1).DrawingObject(nom_case).top Je crois... :oÞ
-- JLuc
michdenis
Bonjour Fred,
Adapte le nom de la feuille
Le Msgbox va devenir lourd dans une boucle de 100 items !
'---------------- With Worksheets("Feuil1") For I = 1 To 100 hauteur = .Shapes("CheckBox" & I).Top MsgBox hauteur Next I End With '----------------
Salutations!
"FredPaqu" a écrit dans le message de news:
Bonjour,
Je souhaite passer le nom d'un objet dans une variable. Voici mon exemple:
For I = 1 To 100 nom_case = "CheckBox" & I hauteur = Sheets(1).nom_case.Top MsgBox hauteur Next I
Ceci me renvois l'erreur 438 (Propriété ou méthode non gérée par cet objet). D'aprés ce que je peux comprendre vba ne remplace pas nom_case par son contenu (CheckBox1, CheckBox2, ...). Quelqu'un aurait il une idée a me soumettre? D'avance merci pour vos réponses
Bonjour Fred,
Adapte le nom de la feuille
Le Msgbox va devenir lourd dans une boucle de 100 items !
'----------------
With Worksheets("Feuil1")
For I = 1 To 100
hauteur = .Shapes("CheckBox" & I).Top
MsgBox hauteur
Next I
End With
'----------------
Salutations!
"FredPaqu" <FredPaqu@discussions.microsoft.com> a écrit dans le message de news:
3F2ACB24-95FB-4C84-BD08-695AF4671B1A@microsoft.com...
Bonjour,
Je souhaite passer le nom d'un objet dans une variable. Voici mon exemple:
For I = 1 To 100
nom_case = "CheckBox" & I
hauteur = Sheets(1).nom_case.Top
MsgBox hauteur
Next I
Ceci me renvois l'erreur 438 (Propriété ou méthode non gérée par cet objet).
D'aprés ce que je peux comprendre vba ne remplace pas nom_case par son
contenu (CheckBox1, CheckBox2, ...).
Quelqu'un aurait il une idée a me soumettre?
D'avance merci pour vos réponses
Le Msgbox va devenir lourd dans une boucle de 100 items !
'---------------- With Worksheets("Feuil1") For I = 1 To 100 hauteur = .Shapes("CheckBox" & I).Top MsgBox hauteur Next I End With '----------------
Salutations!
"FredPaqu" a écrit dans le message de news:
Bonjour,
Je souhaite passer le nom d'un objet dans une variable. Voici mon exemple:
For I = 1 To 100 nom_case = "CheckBox" & I hauteur = Sheets(1).nom_case.Top MsgBox hauteur Next I
Ceci me renvois l'erreur 438 (Propriété ou méthode non gérée par cet objet). D'aprés ce que je peux comprendre vba ne remplace pas nom_case par son contenu (CheckBox1, CheckBox2, ...). Quelqu'un aurait il une idée a me soumettre? D'avance merci pour vos réponses