Tirer formule par VBA

[pierrof]

Bonjour à tous

J'aimerai à partir d'un bouton lancer une macro qui me permette de recopier une formule dans la colonne A, si il y a des informaions dans la colonne B.

Il se peut que la formule soit déjà rentrer sur les première lignes.

Je laisse un fichier exmple.

Merci de votre aide

 

[Efgé]

Re : Tirer formule par VBA

Bonjour,

Range("A2:A" & Range("B65536").End(xlUp).Row).FormulaLocal = "=RECHERCHEV(D2;'C:\asus x71q\Documents\Télégestion\En_cours\[VLog1.xls]Exportation_liste bénéficiaires'!$J$1:$K$15000;2;0)"

Cordialement

 

[Paritec]

Re : Tirer formule par VBA

Bonjour Pirof
regardes et dis moi cliques sur ton bouton
a+
papou 🙂

EDIT : bonjour Efgé trop rapide pour moi !!

 

[pierrof]

Re : Tirer formule par VBA

Bonjour Efgé et Paritec
Merci de vos réponse claires et rapides
A+

 

[max66]

Re : Tirer formule par VBA

Bonjour Efgé,

je viens de tomber sur ta formule et elle correspond parfaitement à ce dont j'ai besoin, à la différence que dans mon cas je souhaite recopier une formule dans la colonne B, s'il y a des infos dans la colonne A. Ça peut paraitre dingue, mais je n'arrive pas à adapter le code à mon cas.

Voici donc :

Sub Formule()

Range("B2:B" & Range("A65536").End(xlUp).Row).FormulaLocal = "=SI(ESTNA(RECHERCHEV('Table finale'!A2;Préparation!$F$2:$Q$65536;11;FAUX));"";RECHERCHEV('Table finale'!A2;Préparation!$F$2:$Q$65536;11;FAUX))"

End Sub

Je pense que c'est le concatener qui me gêne et que je n'arrive pas à utiliser correctement sous VBA...

D'avance merci pour votre aide.

Cordialement.

 

[Paritec]

Re : Tirer formule par VBA

Bonsoir Max66 le forum
le mieux et de joindre un petit fichier avec ce que tu as et ce que tu souhaites obtenir avec les explications dans le fichier et on fera les modifs
a+
Papou 😱