Erreur9 l'indice n'appartient pas à la sélection

Résolu
monalisach -  
 monalisach -
Bonjour,
Mon code me génère erreur'9' l'indice n'appartient pas à la sélection. j'essaye en fait de prendre une valeur d'une feuille et de vérifier sir elle existe dans une autre feuille. puis j'ai fait une condition si la valeur existe donc il faut copier certaines données sinon il faut écrire défauts. voici mon code
Dim i As Integer
Dim j As Integer

For j = 2 To 237
For i = 2 To 119
If ThisWorkbook.Worksheets("1").Cells(j, 9) = ThisWorkbook.Worksheets("crénces1").Cells(i, 6) Then
ThisWorkbook.Worksheets("crénces1").Cells(i, 9) = ThisWorkbook.Worksheets("1").Cells(j, 9)
ThisWorkbook.Worksheets("crénces1").Cells(i, 10) = ThisWorkbook.Worksheets("1").Cells(j, 10)
ThisWorkbook.Worksheets("crénces1").Cells(i, 11) = ThisWorkbook.Worksheets("1").Cells(j, 11)
Else
ThisWorkbook.Worksheets("1").Cells(j, 9) = "défaut"
ThisWorkbook.Worksheets("1").Cells(j, 10) = "défaut"
ThisWorkbook.Worksheets("1").Cells(j, 11) = "défaut"

End If
Next
Next




2 réponses

Réponse 1 / 2
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 279
 
Bonjour,

Le nom de ta feuille est correct ?
Ce n'est pas plutôt créances1 ? Les accents et majuscules comptent.
Et comme tu ajoutes ThisWorkbook. elle doit exister dans le classeur de la macro.

idem pour Worksheets("1")

eric

Jamais tu ne répondras à un mp non sollicité...
Bon, ça c'est fait.
0
Réponse 2 / 2
monalisach
 
ça marche merci beaucoup.
Cordialement
0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
erreur d'execution 9, l'indice n'appartient pas à la sélection
isidoh -
isidoh -

18 réponses
l'indice n'appartient pas à la selection
sabw -
sabw -

2 réponses
Erreur '9' l'indice n'appartient pas à la sélection
Ela_1005 -
Utilisateur anonyme -

5 réponses
variable workbook : l'indice n'appartient pas à la sélection
Mouftie -
moise -

3 réponses