Chercher des cellules dans différents classeurs

[benoa]

Bonjour,

Je souhaiterais trouver dans deux classeurs différents la cellule contenant la chaîne de caractère "MaChaine"

En fait, pour la recherche dans un même classeur, j'utilise les formules suivantes :

Set Cell1 = Sheets("feuil1").Cells.Find(What:="MaChaine", after:=Cells(1, 1), MatchCase:=False)
Set Cell2 = Sheets("feuil2").Cells.Find(What:="MaChaine", after:=Cells(1, 1), MatchCase:=False)​

Suffit-il de préciser devant la commande ?:

Set Cell1 = WorkSheet("MonClasseur.xls").Sheets("feuil1").Cells.Find(What:="MaChaine", after:=Cells(1, 1), MatchCase:=False)​

Pour info, la chaine de caractère est toujours présente dans les fichiers.

Merci à tous pour vos suggestions.

 

[Pierrot93]

Re : Chercher des cellules dans différents classeurs

Re,

tu peux tester ainsi d'ailleurs :

If Not cell Is Nothing Then lig = cell.Row Else MsgBox "non trouvée"

 

[benoa]

Re : Chercher des cellules dans différents classeurs

Ha non, la valeur de Cell n'a pas été retourné

 

[benoa]

Re : Chercher des cellules dans différents classeurs

C'est bon j'ai trouvé mon erreur merci pour ton aide

 

[benoa]

Re : Chercher des cellules dans différents classeurs

Encore Merci

 

[Pierrot93]

Re : Chercher des cellules dans différents classeurs

Re,

Ha non, la valeur de Cell n'a pas été retourné

c'était bien là le souci alors, valeur non trouvée ?

 

[benoa]

Re : Chercher des cellules dans différents classeurs

Oui c'était bien ça.