Erreur 1004 dans une boucle For ? [VB-E] - VB/VBA/VBS - Programmation
MarshPosté le 02-11-2006 à 12:11:07
Bonjour à tous,
J'obtiens une erreur 1004 au moment de modifier la valeur de la cellule "Ai".
Je ne comprends pas pour quelle raison.
En effet, en faisant un copier coller de "=VLOOKUP(D" & i & ";'" & Workbooks(NomClasseurNouveauOrga).Worksheets(2).Name & "'!C1:IV65536;254;FALSE)" (après calcul) dans mon fichier cible, ça fonctionne parfaitement. Ce n'est donc pas la syntaxe qui est mauvaise.
J'ai une option Explicit qui m'interdit les erreurs de déclaration de variables normalement.
Est ce que vous voyez pourquoi ça plante ?
Dim i As Long For i = 7 To Cells(Rows.Count, 2).End(xlUp).Row Range("A" & i).Value = "=VLOOKUP(D" & i & ";'" & Workbooks(NomClasseurNouveauOrga).Worksheets(2).Name & "'!C1:IV65536;254;FALSE)" Next
Marsh Posté le 02-11-2006 à 12:11:07
Bonjour à tous,
J'obtiens une erreur 1004 au moment de modifier la valeur de la cellule
"Ai".
Je ne comprends pas pour quelle raison.
En effet, en faisant un copier coller de "=VLOOKUP(D" & i & ";'" &
Workbooks(NomClasseurNouveauOrga).Worksheets(2).Name &
"'!C1:IV65536;254;FALSE)" (après calcul) dans mon fichier cible, ça
fonctionne parfaitement. Ce n'est donc pas la syntaxe qui est mauvaise.
J'ai une option Explicit qui m'interdit les erreurs de déclaration de
variables normalement.
Est ce que vous voyez pourquoi ça plante ?
Dim i As Long
For i = 7 To Cells(Rows.Count, 2).End(xlUp).Row
Range("A" & i).Value = "=VLOOKUP(D" & i & ";'" &
Workbooks(NomClasseurNouveauOrga).Worksheets(2).Name &
"'!C1:IV65536;254;FALSE)"
Next
Merci à tous,
Lycaon.