Chercher un contenu de cellule et affecter ses coordonnées

herve62 · 25 Octobre 2007

Bonsoir
Il m'est arrivé plusieurs fois à balayer des cellules dans un tableau ( boucle en VBA) à la recherche d'une valeur , lorsque celle-ci était trouvée , je voulais affecter à une variable ses coordonnées , ex: chercher "DUPONT" puis mettre dans une variable que cela se trouve en D10 donc par exemple cel_nom = "D10" afin de pouvoir m'en servir ensuite
Je n'ai pas trouvé d'instruction directe ( cel_nom = instruction VBA)
est-ce possible ? comment faire
Merci

Hervé

Pierrot93 · 25 Octobre 2007

Re : Chercher un contenu de cellule et affecter ses coordonnées

Bonsoir Herve

regarde peut être le code ci dessous, si cela peut t aider :

recherche dans la colonne A, à adapter

Code:

Sub Recherche()
Dim x As Range
Set x = Range("A:A").Find("Dupont", , xlValues, xlWhole, , , False)
    If Not x Is Nothing Then MsgBox  x.Address
End Sub

Bonne soirée
@+

herve62 · 25 Octobre 2007

Re : Chercher un contenu de cellule et affecter ses coordonnées

Bonsoir Pierrot
Merci , cà à l'air de marcher , j'ai même essayé en ligne ( range(4:4) ) et j'ai affecté une variable qui affiche dans une cellule les coordonnees , c'est OK ex: dupont en F4 affiche
$F$4
je verrais dans mes appli. , reste peut-être à supprimer les "$"

A+
Hervé

Pierrot93 · 25 Octobre 2007

Re : Chercher un contenu de cellule et affecter ses coordonnées

Re Hervé

pour supprimer les $, utilises ainsi :

Code:

Then MsgBox  x.Address(0,0)

@+

Chercher un contenu de cellule et affecter ses coordonnées

herve62

XLDnaute Barbatruc

Pierrot93

XLDnaute Barbatruc

herve62

XLDnaute Barbatruc

Pierrot93

XLDnaute Barbatruc

Discussions similaires

Chercher un contenu de cellule et affecter ses coordonnées

herve62

XLDnaute Barbatruc

Pierrot93

XLDnaute Barbatruc

herve62

XLDnaute Barbatruc

Pierrot93

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency