VBA - Chercher un mot dans une feuille

[Excel-lent]

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 :

Sub Test ()

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

ou

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]

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]

Re : VBA - Chercher un mot dans une feuille

Bonjour Excel-lent, 2passage

essaye peut être comme ci dessous :

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]

Remerciement

Merci beaucoup à vous deux

C'est exactement ce dont j'avais besoin