Erreur qualificateur incorrecte [Résolu]

anduj0011 4 Messages postés jeudi 16 décembre 2010Date d'inscription 18 février 2011 Dernière intervention - 18 févr. 2011 à 10:28 - Dernière réponse : anduj0011 4 Messages postés jeudi 16 décembre 2010Date d'inscription 18 février 2011 Dernière intervention
- 18 févr. 2011 à 13:04
bonjour je veux créer un code qui permet de recopier les cellules des feuilles existantes d'un classeur dans une seule et même feuille.
Mais je rencontre une erreur "qualificateur incorrecte" visant ma variable "i" lors de l'exécution.

Private Sub CommandButton1_Click()
Dim nombre As Integer
Dim i As Integer
Dim number As Integer

i = 2
nombre = 2
number = 4

While (Feuil & i <> "")
While (Feuil & i .Range("a4").Value <> "")
Feuil1.Range("a & nombre") = Feuil & nbre.Range("a & number").Value
nombre = nombre + 1
number = number + 1
Wend
i = i + 1
Wend

End Sub

quelqu'un peu tm'aider? je suis sure que ce n'est pas grand chose
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
c148270 303 Messages postés mercredi 12 janvier 2005Date d'inscription 3 octobre 2013 Dernière intervention - 18 févr. 2011 à 12:53
3
Merci
Bonjour
Ecrire plutot : sheets(Feuil & i).range

Bonne journée

Merci c148270 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 123 internautes ce mois-ci

Commenter la réponse de c148270
anduj0011 4 Messages postés jeudi 16 décembre 2010Date d'inscription 18 février 2011 Dernière intervention - 18 févr. 2011 à 13:04
0
Merci
merci beaucoup j'avais justement fini par trouvé
Commenter la réponse de anduj0011

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.