Discussion :

[hajar1403]

Bonjour, je me permet de poser ma question sur ce forum parce que je n'arrive pas à trouver une solution à mon problème et ma question est dans l'intitulé de la discussion, je m'explique je voudrais chercher un mot clé dans mon document une fois trouvé copier la cellule en face et le coller dans une troisième cellule.
cela va être fait pour plusieurs cellule c pour cela la macro.
Merci d'avance

[Menhir]

En somme, tu cherches à recréer la fonction RECHERCHEV() en standard dans Excel ?

Pour chercher une valeur dans une liste, tu peux utiliser la méthode Find appliqué à une référence Range représentant ta zone de recherche.
Lire ça : https://msdn.microsoft.com/fr-fr/lib...6(v=office.15)

Pour désigner la cellule "en face", utilise la propriété Offset. Si par "en face" tu veux parler de la cellule de droite, ce sera Offset(0, 1).
https://msdn.microsoft.com/fr-fr/lib...0(v=office.15)

Pour mettre sa valeur dans une autre cellule, tu peux le faire avec un simple "=" de Value à Value.

[hajar1403]

Merci beaucoup je vais essayer cette méthode .

[hajar1403]

Navrée mais j'y arrive pas.

ma macro commence par

Code :

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

1
2
3
WApp.Selection.HomeKey Unit:=6                            'Retourne au début du fichier Word
WApp.Selection.Find.ClearFormatting                         'on "vide la mémoire" de la fonction Recherche
WApp.Selection.Find.Execute "Nature des travaux"     'On trouve le texte "Nature des travaux"

mais je n'arrive pas à sélectionner le texte de la cellule en face de la cellule contenant "nature des travaux" avec offset(0,1).
Pour info WApp parce que je prend des infos de word vers excel.


est ce que c'est possible de m'aider svp

[Menhir]

Tu ne penses pas que ça pouvait avoir un peu d'importance de préciser que la recherche se faisait dans Word alors que la question est posée dans la rubrique VBA Excel ???

[hajar1403]

Navrée je ne savais pas que c'était important vu que pas mal de macro sont les memes dans word et excel.