No de lignes et de colonnes

Bonsour® Pierre F. avec ferveur ;o))) vous nous disiez :

Sur une feuille j'ai 2 tableaux:
-Le premier A1:F13 contient les nombres de 1 à 78 dans le désordre
-Le second J3:V8 contient les mêmes nombres dans un ordre différent.
Je souhaiterai obtenir (en K16 par exemple) le numéro de la colonne du
second tableau dans laquelle se trouve le nombre écrit en A1
et en L16 le numéro de la ligne.

Voir le fichier joint
http://cjoint.com/?knl5fhtNnL

si l'un des deux tableaux était ordonné (trié)
l'on pourrait se passer de macro ....

selon le fichier joint :
une fonction personnalisée permet le travail demandé

Function verif(target, plage)
' renvoie l'adresse de la valeur recherchée
xx = "#NA"
With Sheets("feuil1").Range(plage.Address)
Set c = .Find(What:=target, LookIn:=xlValues)
If Not c Is Nothing Then xx = c.Address(True, True)
verif = xx
End With
End Function

target : correspond à la valeur cherchée
Plage : correspond à l'adresse du tableau ou l'on cherche
syntaxe :
=verif(A1;$J$3:$V$8)
pour la colonne :
=colonne(indirect(verif(a1;tableau2)))
pour la ligne :
=ligne(indirect(verif(a1;tableau2)))



--
--
@+
;o)))

Bonsour® Pierre F. avec ferveur ;o))) vous nous disiez :

Sur une feuille j'ai 2 tableaux:
-Le premier A1:F13 contient les nombres de 1 à 78 dans le désordre
-Le second J3:V8 contient les mêmes nombres dans un ordre différent.
Je souhaiterai obtenir (en K16 par exemple) le numéro de la colonne
du second tableau dans laquelle se trouve le nombre écrit en A1
et en L16 le numéro de la ligne.

Voir le fichier joint
http://cjoint.com/?knl5fhtNnL

si le second tableau était ordonné (trié)
l'on pourrait se passer de macro ....
--
@+
;o)))

Modeste a écrit :

si l'un des deux tableaux était ordonné (trié)
l'on pourrait se passer de macro ....

selon le fichier joint :
une fonction personnalisée permet le travail demandé

Function verif(target, plage)
' renvoie l'adresse de la valeur recherchée
xx = "#NA"
With Sheets("feuil1").Range(plage.Address)
Set c = .Find(What:=target, LookIn:=xlValues)
If Not c Is Nothing Then xx = c.Address(True, True)
verif = xx
End With
End Function

target : correspond à la valeur cherchée
Plage : correspond à l'adresse du tableau ou l'on cherche
syntaxe :
=verif(A1;$J$3:$V$8)
pour la colonne :
=colonne(indirect(verif(a1;tableau2)))
pour la ligne :
=ligne(indirect(verif(a1;tableau2)))

Merci...
Où dois-je placer la fonction: workbook, module??

Cordialement,
Pierre F.

Petite précision:

je souhaite récupérer les no des lignes et colonnes pour chacun des
éléments du tableau 1 trouvé dans le tableau 2

Cordialement,
Pierre F.

Bonsour® Pierre F. avec ferveur ;o))) vous nous disiez :

Où dois-je placer la fonction: workbook, module??

http://cjoint.com/?knqzRDFeaI




--
--
@+
;o)))

Modeste a écrit :

Bonsour® Pierre F. avec ferveur ;o))) vous nous disiez :

Où dois-je placer la fonction: workbook, module??

http://cjoint.com/?knqzRDFeaI

Ça c'est du top de chez top !

Mille mercis; c'est exactement ce que je souhaitais.

Cordialement,
Pierre F.