Besoin d'aide VBA

zizou97 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
J'aurais besoin d'un petit coup de main svp

Voici mon code sur VBA:

Sub quota()
Dim i, k As Integer
nbligne1 = Workbooks("Ecoles2008").Sheets("Feuil1").UsedRange.Rows.Count
nbligne3 = Workbooks("Ecoles2008").Sheets("Feuil3").UsedRange.Rows.Count
For i = 1 To nbligne1
For k = 1 To nbligne3
If Workbooks("Ecoles2008").Sheets("Feuil1").UsedRange.Cells(i, 1) Like Workbooks("Ecoles2008").Sheets("Feuil3").UsedRange.Cells(k, 2) Then Workbooks("Ecoles2008").Sheets("Feuil3").UsedRange.Cells(k, 5) = Workbooks("Ecoles2008").Sheets("Feuil1").UsedRange.Cells(i, 70) + Workbooks("Ecoles2008").Sheets("Feuil1").UsedRange.Cells(i, 70)
Next k
Next i
End Sub


quand j'essaie d'exécuter une erreur s'affiche :

"erreur d'exécution 9 : l'indice n'appartient pas à la sélection"

Est-ce que quelqu'un a une idée?

merci

2 réponses

zizou97 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
en fait c'est bon j'ai trouvé le problème : le nom de la feuille n'était pas correct
0
megane08000
 
bonjour
j ai une personne qui n arrete pas de m onvoyer des message
je voudrai trouver son nom d apres son num de telephone.
quelqun peu maider?
merci
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Quel est le rapport de ce post avec la question posée ?
0