Bonjour à tous,

Voila, je souhaite chercher une valeur dans un classeur multi-onglet à la colonne C, et si elle existe, afficher la cellule.
J'ai pour le moment concocter quelquechose qui me dit si la valeur existe ou pas, mais je n'arrive pas à récupérer la valeur de la cellule pour l'afficher...
suis-je bien clair ?...

Voila mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Private Sub CommandButton1_Click()
a = TextBox1.Value
For Each sh In Workbooks("Suivi Dénonciations7.xls").Worksheets
Set rng = sh.Range("C1:C65536").Find(a, sh.[C1], xlValues, xlWhole, xlByRows, xlPrevious)
If Not rng Is Nothing Then
rng.Offset(0, 3).Copy ActiveCell.Offset(0, 3)
Entire.Row.Activate
'c'est là qu'il faut que je rajoute mon code pour afficher la cellule trouvée...
MsgBox "le dossier existe"
Exit Sub
End If
Next
MsgBox "le dossier n'existe pas"
End Sub
Voila, en espérant avoir été clair...

Merci par avance.

John