Discussion :

[diplos]

Bonjour à tous,

Je suis en train de réaliser une macro qui me sert à réaliser un publipostage entre mon tableau Excel et des documents Word (en utilisant la cellule active de ma feuille je créé un dossier et je rempli les documents word)

J’ai des informations sur plusieurs onglet de mon tableau Excel et pour contourner le fait de ne pouvoir utiliser les signets que sur une seule feuille j’ai fait cette formule :

Code :

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

avis = "=INDEX(avis!$A:$A;EQUIV(Données!O" & ActiveCell.Row & ";avis!$B:$B;0))"

Actuellement le résultat que j’obtiens est la formule (logique) et je souhaite obtenir la valeur retournée par la formule.

J'ai trouvé plusieurs solutions sur le forum mais je n’arrive pas à les mettre en application :
- passer la formule en anglais (MATCH à la place du EQUIV), changer les cellules et utiliser WorksheetFunction.Match
- utiliser un formulalocal

Mais je ne suis pas sur de me poser les bonnes questions ni prendre le problème dans le bon sens, si une personne à une idée ou peut me conforter dans la solution à utiliser

Merci d’avance

diplos

[anasecu]

Bonjour,

je souhaite obtenir la valeur retournée par la formule.

Avec ce code tu obtiens dans la variable 'avis' le résultat de ta formule si la feuille "Données" est active

Code :

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

1
2
3
4
5
6
Dim avis
Dim ws As Worksheet
Set ws = Sheets("avis")
With Application
    avis = .Index(ws.Range("$A:$A"), .Match(Range("O" & ActiveCell.Row), ws.Range("$B:$B"), 0))
End With

[diplos]

Merci beaucoup c'est exactement ce que je voulais obtenir