VBA compréhension formule VLOOKUP

[Kouik Kouik jr]

Bonjour,

j'ai réussi à utiliser la formule Vlookup sur VBA pour aller comparer cellules correspondant à la colonne A (Noms de fonds) et mettres les identifiants correspondant dans la colonne B

J'aimerais faire la même chose dans la même feuille avec la colonne H (Noms de fonds) et donc mettre les identifiants correspondant dans la colonne I mais je n'arrive pas !

Il doit y'avoir un ptit bug de ma part au niveau de la formule:
ActiveCell.FormulaR1C1 = "=+VLOOKUP(RC[-1],Symbol!C[-1]:J,2,0)"

Je vous joins le code avec en première partie ce qui marche. C'est la partie alias correspondant à estimées qui ne fonctionne pas😕


Un grand merci d'avance


'Alias correspond à n° syz suivant
Sheets("SYZ").Select
Range("B1").Select
ActiveCell.FormulaR1C1 = "=+VLOOKUP(RC[-1],Symbol!C[-1]:C,2,0)"
Range("B1").Select
Selection.AutoFill Destination:=Range("B1:B198")
Range("B1:B198").Select
Cells.Select
Selection.ColumnWidth = 13

'Alias correspondant a estimées
Sheets("SYZ").Select
Range("I1").Select
ActiveCell.FormulaR1C1 = "=+VLOOKUP(RC[-1],Symbol!C[-1]:J,2,0)"
Range("I1").Select
Selection.AutoFill Destination:=Range("I1:I198")
Range("I1:I198").Select
Cells.Select
Selection.ColumnWidth = 13

 

[Catrice]

Re : VBA compréhension formule VLOOKUP

Bonjour,

J'ai simplifié et testé ton code, je n'ai pas tres bien compris ce que tu voulais faire.
J'ai testé en modifiant le J en C (voir plus bas).
C'est quoi les noms de Fonds ?
Peux poster un fichier ?

Sub Test()
'Alias correspond à n° syz suivant
With Sheets("SYZ")
.Range("B1").FormulaR1C1 = "=VLOOKUP(RC[-1],Symbol!C[-1]:C,2,0)"
.Range("B1").AutoFill Destination:=.Range("B1:B198")
.Range("B1:B198").ColumnWidth = 13

'Alias correspondant a estimées
.Range("I1").FormulaR1C1 = "=VLOOKUP(RC[-1],Symbol!C[-1]:C,2,0)"
.Range("I1").AutoFill Destination:=.Range("I1:I198")
.Range("I1:I198").ColumnWidth = 13
End With
End Sub

 

[Kouik Kouik jr]

Re : VBA compréhension formule VLOOKUP

Merci mais cela ne m'aide pas vraiment !

J'aurais besoin d'une formule sur vba qui utilise VLOOKUP pour toute les cellules de la colonne I
=+VLOOKUP(A1;Symbol!A:B;2;0) Ca c'est la formule pour la colonne B
qui devient Range("B1").FormulaR1C1 = "=VLOOKUP(RC[-1],Symbol!C[-1]:C,2,0)"

Mais il me faudrait =+VLOOKUP(I1;Symbol!A:B;2;0) pour la colonne I qui deviendrait ?

 

[Catrice]

Re : VBA compréhension formule VLOOKUP

Re,

Peut etre :
.Range("I1").FormulaR1C1 = "=VLOOKUP(RC[-8],Symbol!C[-8]:C[-7],2,0)"

Quelle est la formule souhaitée dans la colonne I ?
Pour trouver la bonne formule, tu peux passer par Macro enregistrer.

Sinon, pour simplifier, tu peux faire :
.Range("I1").Formula = "=VLOOKUP(A1,Symbol!A:B,2,0)"
Avec les references en mode AlphaNumérique.

 

[Kouik Kouik jr]

Re : VBA compréhension formule VLOOKUP

Impec ca marche merci beaucoup !!!!!!!!!!