Discussion :

[crisjoce]

Bonjour
Je souhaiterais avoir dans une macro la fonction rechercheV du type ci dessous.
et continuer en descendant d'une ligne.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.FormulaR1C1 = "=VLOOKUP(Feuil1!RC[-5],BD!R[-10]C[-6]:R[97]C[-3],4)"

[Philippe Tulliez]

Bonjour,
A lire ces deux billets Ecrire une formule dans Excel à l'aide d'une procédure VBA et la suite Ecrire une formule dans Excel à l'aide d'une procédure VBA (Part 2)

[crisjoce]

J'ai reussi a faire cette macro, mais je n'arrive pas a poursuivre
en decalant d'une ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub Macro1()
    Range("G12").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-5],R[6]C[5]:R[11]C[10],6)"
    Range("f12").Select
    ActiveCell.FormulaR1C1 = "=SUM(RC[-2]*RC[-1])"
    Range("d12").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-2],R[6]C[9]:R[11]C[14],2)"
    Range("C12").Select
    ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],R[6]C[9]:R[11]C[14],2)"
 
 With Selection
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
 
    End With
End Sub

[Philippe Tulliez]

Bonjour,
C'est dès fois fatiguant de répondre. Manifestement tu n'as pas lu les liens que j'ai référencé.

[crisjoce]

j'ai lu les liens dont tu me parle.
mais je ne vois pas en ce qui concerne la fonction recherchev

ainsi qu'une fois la recherche effectuee, descendre d'une ligne.

c'est pas grave, je vais continue de chercher seul
merci a toi
cris

[Philippe Tulliez]

Bonjour,

'ai lu les liens dont tu me parle.
mais je ne vois pas en ce qui concerne la fonction recherche

Le lien explique, comment écrire une formule dans une cellule ou une plage de cellules avec un cas simple et un cas compliqué, c'est à dire avec la gestion des plages et paramètres en utilisant des balises.
Si tu sais utiliser la fonction RECHERCHEV, tu n'auras aucun mal après la lecture des liens d'utiliser cette fonction en VBA.
Je n'ai effectivement pas fait un exemple avec chacune des quelques 400 fonctions d'excel.

Si tu avais lu d'ailleurs convenablement ces billets, tu aurais utilisé sans doute la propriété Formula et pas FormulaR1C1 qui me semble moins simple à utiliser mais surtout, tu aurais éviter la méthode Select et l'objet Selection qui sont à proscrire en VBA.

ainsi qu'une fois la recherche effectuee, descendre d'une ligne.

Qu'entends-tu pas descendre d'une ligne ?