Erreur 1004
hshs
-
Pierre1310 Messages postés 8854 Statut Membre -
Pierre1310 Messages postés 8854 Statut Membre -
Bonjour,
Je sais pas pourquoi on me donne erreur sachant que j utilise la meme ligne de code dans une autre fonction et ça marrche
While nbYearTemp > 0
While InStr(listYear, ThisWorkbook.Sheets("DataValProp").Range("A" & i + cursorYear).Value) = 0 Or ThisWorkbook.Sheets("DataValProp").Range("A" & i + cursorYear).Value = ""
i = i + 1
Wend
While InStr(ThisWorkbook.Sheets("DataValProp").Range("A" & i + cursorYear).Value, "Average") = 0
i = i + 1
Wend
i = i + cursorYear
cursorYear = i + 1
listRange = listRange & "A" & i & ":BW" & i & ","
nbYearTemp = nbYearTemp - 1
i = 1
Wend
Je sais pas pourquoi on me donne erreur sachant que j utilise la meme ligne de code dans une autre fonction et ça marrche
While nbYearTemp > 0
While InStr(listYear, ThisWorkbook.Sheets("DataValProp").Range("A" & i + cursorYear).Value) = 0 Or ThisWorkbook.Sheets("DataValProp").Range("A" & i + cursorYear).Value = ""
i = i + 1
Wend
While InStr(ThisWorkbook.Sheets("DataValProp").Range("A" & i + cursorYear).Value, "Average") = 0
i = i + 1
Wend
i = i + cursorYear
cursorYear = i + 1
listRange = listRange & "A" & i & ":BW" & i & ","
nbYearTemp = nbYearTemp - 1
i = 1
Wend
2 réponses
-
Salut,
Mets des balises "basic" pour ton code et donne la ligne ou il y a ton erreur stp.
-
l'erreur c est sur la ligne
While InStr(listYear, ThisWorkbook.Sheets("DataValProp").Range("A" & i + cursorYear).Value) = 0 Or ThisWorkbook.Sheets("DataValProp").Range("A" & i + cursorYear).Value = ""
Excuse moi je suis vraiment debutante j ai pas compris qu est ce que tu veux dire par "basic"
