VBA - Chercher un mot dans une feuille

Excel-lent · 3 Août 2007

Bonjour le forum,

Dans une feuille, j'ai le mot "tata", il n'est jamais dans la même cellule.

J'ai besoin de connaître son emplacement et le mettre dans une variable.

Soit sous la forme ("B8")

Soit sous la forme :
=> 1 variable -> contenant le numéro de la colonne
=> 1 autre variable -> contenant le numéro de la ligne.

Il semblerait que je doive utiliser la formule 'Cells.Find' mais je n'arrive pas à finaliser.

Voici où j'en suis :

Code:

Sub Test ()

Dim Emplacement As Range
Set Emplacement = Cells.Find("tata")
...  ??? ...
End Sub

ou

Code:

Sub Test ()

Dim Ligne As Integer
Dim Colonne As Integer
Set ...???...
End Sub

Espèrant avoir été clair.

Merci d'avance pour votre aide.

2passage · 3 Août 2007

Re : VBA - Chercher un mot dans une feuille

Bonjour,
Si le mot n'est qu'une fois dans la feuille :

ta_variable = Range("A1:IV65536").Find("tata").Address

Pense à intercepter l'erreur si le find ne trouve pas la valeur.
a plus 🙂

Pierrot93 · 3 Août 2007

Re : VBA - Chercher un mot dans une feuille

Bonjour Excel-lent, 2passage

essaye peut être comme ci dessous :

Code:

Sub test()
Dim x As Range, a As String, l As Integer, c As Integer
Set x = Cells.Find("tata", , xlValues, xlWhole, , , False)
If Not x Is Nothing Then
    a = x.Address(0, 0)
    l = x.Row
    c = x.Column
End If
End Sub

bon après midi
@+

Excel-lent · 3 Août 2007

Remerciement

Merci beaucoup à vous deux

C'est exactement ce dont j'avais besoin

VBA - Chercher un mot dans une feuille

Excel-lent

XLDnaute Barbatruc

2passage

XLDnaute Impliqué

Pierrot93

XLDnaute Barbatruc

Excel-lent

XLDnaute Barbatruc

Discussions similaires

VBA - Chercher un mot dans une feuille

Excel-lent

XLDnaute Barbatruc

2passage

XLDnaute Impliqué

Pierrot93

XLDnaute Barbatruc

Excel-lent

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency