Mélange de Application.VLookup et Cells.Find

Résolu
tiboys -  
 tiboys -
Bonjour à toutes et à tous,

je débute en programmation et je galère à mélanger 2 macos, je m'explique :
je voudrais qu'une macro cherche une valeur dans un tableau suivant 2 valeurs et me mette les coordonnées de la cellule en variable.

Ou plus simple, trouver une valeur dans une colonne et me donner les coordonnées de la cellule 5 colonne à droite sur la même ligne ..

un mélange de Application.VLookup et Cells.Find mais je n'arrive pas à l'écrire ou la trouver :-/

Auriez-vous une idée ?

Merci d'avance

Tiboys



2 réponses

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour

si "toto"cherché dans colonne A par exemple
xxx = Columns("A").Find("toto", Range("A" & Cells.Rows.Count)).Offset(0, 5)

 Michel
0
tiboys
 
Merci Michel, il me mets une erreur d'éxecution 91 ..:-/
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
j'ai donc refait ma maquette qui fonctionnait....

http://www.cjoint.com/c/FCym73nlJlt
0
tiboys
 
ta maquette fonctionne très bien mais il me retourne le contenu de la cellule. En fait je recherche les coordonnées de la cellule .. c'est possible ?

Désolé d'insister ..
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Bonjour

En attendant que Michel (salut à toi) revienne de sa pause café ;-)
MsgBox Columns("A").Find("toto", Range("A" & Cells.Rows.Count)).Offset(0, 5).Address
devrait aller

Cdlmnt
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Salut CCM81
j'arrivai à la bourre :o)
merci pour le coup de main
0
tiboys
 
Ca fonctionne magnifiquement bien, vous êtes des pros .. merci beaucoup ! *-*
0