VLookup with declared range

Version imprimable

Hello !

Rien à faire, le VLookup en VBA n'est vraiment pas ma ma tasse de thé.

Après avoir essayé plus de 20 variantes, je me tourne vers votre science ;) Une idée de ce qui empêche le code ci-dessous de fonctionner (exemple simplifié) ?
Code:

1 2 3 4 5 6 7 Sub VLookup_Macro() Dim arrayF As Range Sheets("A").Activate Set arrayF = Range("A1:B10") Sheets("B").Activate Cells(1, 2) = Application.WorksheetFunction.VLookup(Cells(1, 1).Value, Sheets("A").Range("arrayF"), 2, False) End Sub
Voici l'erreur que j'obtiens : application-defined or object defined error.

Des idées ?

Merci d'avance.

Bonjour,

Code:

1
2
3
4
5
6
7
Sub VLookup_Macro()
Dim ArrayF As Range
    Set ArrayF = Sheets("A").Range("A1:B10")
    With Sheets("B")
        .Cells(1, 2) = Application.WorksheetFunction.VLookup(.Cells(1, 1).Value, ArrayF, 2, False)
    End With
End Sub

Cordialement.

30/05/2012, 09h45
jfontaine
Bonjour,

Si tu place ta variable ArrayF entre Quote tu ne fais plus référence à la variable mais à la plage nommée ArrayF

Essais comme cela (pas testé)
Code:

1 2 3 4 5 Dim arrayF As Range Set arrayF = Sheets("A").Range("A1:B10") Sheets("B").Cells(1, 2).Value = Application.WorksheetFunction.VLookup(Cells(1, 1).Value, arrayF, 2, False)
EDIT : so good gFZT82 :ccool: