Erreur 1004 avec formule vlookup

Fermé
Keufi - 8 juil. 2009 à 17:21
yg_be Messages postés 23336 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 novembre 2024 - 13 juil. 2009 à 14:56
Bonjour,


Je rencontre une erreur 1004 "Erreur définie par l'application ou par l'objet" qui survient sur la ligne activecell.formula...

Voici mon code complet:

Sub EURIBOR()
Dim cpt As Long
Dim i As Long
Dim longueur As Long

Sheets("Crédits CMB").Activate
Range("W13").Select

Set cellules = Range(Selection, Selection.End(xlToRight))
longueur = cellules.Count
For i = 1 To longueur

ActiveCell.Formula = "=VLookup(ActiveCell.Offset(-1, 0).Value, Range(""AV:AX"" & Range(""AX65536"").end(xlup).row)), 3, FAUX)"
ActiveCell.Offset(0, 1).Select
Next i

End Sub

Quelqu'un arrive à voir ce qui cloche?

Merci
A voir également:

1 réponse

yg_be Messages postés 23336 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 novembre 2024 Ambassadeur 1 551
13 juil. 2009 à 14:56
As-tu essayé de simplement mettre le texte corerspondant, à la main, comme formule ?
Fais :
msgbox "=VLookup(ActiveCell.Offset(-1, 0).Value, Range(""AV:AX"" & Range(""AX65536"").end(xlup).row)), 3, FAUX)"

Tu vas probablement constater par toi-même que ce n'est pas une formule correcte...
0