VBA: mavar = vrecherche

[arnaudbu]

Bonjour,

Je cherche à faire en vba:


dim mavar1 as ..........
mavar1 = vrecherche

............ et ensuite exploiter mavar1 pour afficher le résultat de la formule genre:

comment.text text= mavar1

Merci et @+

 

[arnaudbu]

Re : VBA: mavar = vrecherche

Merci quand même. Je vais étudier l'autre méthode. Maintenant c'est plus l'autre soucis qui me bloque.

 

[arnaudbu]

Re : VBA: mavar = vrecherche

Sinon puis je mettre deux formule dans la même cellule genre:

.formulalocal="Descrip:" & VRECHERCHE & "Poste:" & VRECHERCHE dans le genre

 

[Pierrot93]

Re : VBA: mavar = vrecherche

Re

très abstrait tout ca... A quoi correspond VRECHERCHE.... une variable... elle contient quoi ? du texte ? une formule ? plus de questions que de réponse.... en l'état vois pas trop comment t'aider....

 

[arnaudbu]

Re : VBA: mavar = vrecherche

Excuse c'est RECHERCHEV ou VLOOKUP.

Donc deux formules RECHERCHEV dans la même cellule.

 

[Pierrot93]

Re : VBA: mavar = vrecherche

Re

je dirais une seule formule dans laquelle tu peux imbriquer 2 fonctions RECHERCHEV, oui c'est possible. Maintenant, perso, suis pas trop formuliste, alors pour ce qui est de la création de la formule, pourrais pas trop t'aider, mais essaye déjà de la faire manuellement avec l'enregisteur de macro, cela donnera certainement un bon départ....

 

[arnaudbu]

Re : VBA: mavar = vrecherche

Bon j'ai réussi à faire ça:

'VRECHERCHE DESCRIPTION
    With ActiveCell.Offset(0, 6)
        FormuleDescrip = "SI(ESTNA(RECHERCHEV(" & NumAvis & ";" & BaseSAP & "!" & Plg & ";7;FAUX));"""";RECHERCHEV(" & NumAvis & ";" & BaseSAP & "!" & Plg & ";7;FAUX))"
        FormulePosteTech = "SI(ESTNA(RECHERCHEV(" & NumAvis & ";" & BaseSAP & "!" & Plg & ";8;FAUX));"""";RECHERCHEV(" & NumAvis & ";" & BaseSAP & "!" & Plg & ";8;FAUX))"
       .FormulaLocal = "=" & FormuleDescrip & "& "" (""&" & FormulePosteTech & "& "")"""
       .Locked = True
    End With

ça marche ... cool !