Mélange de Application.VLookup et Cells.Find

Résolu

tiboys -
tiboys - 25 mars 2016 à 09:12

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

Afficher la suite

2 réponses

Réponse 1 / 2
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention 3 320
Bonjour

si "toto"cherché dans colonne A par exemple
```
xxx = Columns("A").Find("toto", Range("A" & Cells.Rows.Count)).Offset(0, 5)
```
Michel
0
1. tiboys
  
  Merci Michel, il me mets une erreur d'éxecution 91 ..:-/
  
  0
2. michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention 3 320
  
  j'ai donc refait ma maquette qui fonctionnait....
  
  http://www.cjoint.com/c/FCym73nlJlt
  
  0
3. 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
Réponse 2 / 2
ccm81 Messages postés 11033 Statut Membre 2 434

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
1. michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention 3 320
  
  Salut CCM81
  j'arrivai à la bourre :o)
  merci pour le coup de main
  
  0
2. tiboys
  
  Ca fonctionne magnifiquement bien, vous êtes des pros .. merci beaucoup ! *-*
  
  0

Mélange de Application.VLookup et Cells.Find

2 réponses

Discussions similaires

Newsletters