Mélange de Application.VLookup et Cells.Find

Résolu/Fermé

tiboys - 24 mars 2016 à 09:59
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

A voir également:

Mélange de Application.VLookup et Cells.Find
Logiciel mélange de prénom ✓ - Forum Loisirs / Divertissements
Mélange liquide de frein et direction assistée - Forum Réseaux sociaux
Mélange rose et orange - Forum Graphisme
Cells.find vba excel - Astuces et Solutions
Mélanger ddr3 et ddr4 ✓ - Forum Carte-mère/mémoire

2 réponses

Réponse 1 / 2

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
Modifié par michel_m le 24/03/2016 à 11:23

Bonjour

si "toto"cherché dans colonne A par exemple

xxx = Columns("A").Find("toto", Range("A" & Cells.Rows.Count)).Offset(0, 5)

Michel

tiboys
24 mars 2016 à 12:25

Merci Michel, il me mets une erreur d'éxecution 91 ..:-/

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
24 mars 2016 à 14:00

j'ai donc refait ma maquette qui fonctionnait....

http://www.cjoint.com/c/FCym73nlJlt

tiboys
24 mars 2016 à 14:54

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 ..

Réponse 2 / 2

ccm81 Messages postés 10906 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 13 janvier 2025 2 429
24 mars 2016 à 15:25

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

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
24 mars 2016 à 15:28

Salut CCM81
j'arrivai à la bourre :o)
merci pour le coup de main

tiboys
25 mars 2016 à 09:12

Ca fonctionne magnifiquement bien, vous êtes des pros .. merci beaucoup ! *-*

Discussions similaires

rose + noir

Mélangeur de lettres

mélange de noms pour former des équipes

Comment utiliser FaceApp pour modifier un visage

gris et beige