Excel - buscar en excel

Hola

quiero que me ayuden, en una planilla excel donde tengo tres hojas, en la hoja1 aplico la función buscarv en un celda (A2) y el resultado lo busquo en la hoja2 y hoja3. EN ESTOS MOMENTOS lo puedo hacer pero, solo logro que los resultados sean de la hoja2. no se como anidar para buscar en la hoja3
no se si me entiendes.
saludos.

Private Sub cmdBusqueda_Click()
'Stop
If txtArgumento = "" Then
MsgBox "Coloca algun dato para buscar", vbOKOnly + vbInformation, "AVISO"
txtArgumento.SetFocus
Exit Sub
End If
' ----------------------------------------------------
For i = 1 To Sheets.Count
Juan1 = Sheets(i).Name
Worksheets(i).Select
With Worksheets(i).Range("a1:z65536")
Set c = .Find("*" & txtArgumento & "*", LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
txtDatos = Worksheets(i).Name & Chr(10) & _
c.Address & ": " & c.Value & Chr(10) & _
Worksheets(i).Range("A" & Mid(c.Address, 4, 4)) & Chr(10) & _
Worksheets(i).Range("B" & Mid(c.Address, 4, 4)) & Chr(10) & _
Worksheets(i).Range("C" & Mid(c.Address, 4, 4)) & Chr(10) & _
Worksheets(i).Range("D" & Mid(c.Address, 4, 4)) & Chr(10) & _
Worksheets(i).Range("E" & Mid(c.Address, 4, 4)) & Chr(10) & _
Worksheets(i).Range("F" & Mid(c.Address, 4, 4))
Worksheets(i).Range(c.Address).Select
' -----------------------

Titulo = "¿Es esto lo buscado?" & txtArgumento & Juan & Chr(10)
Texto = Mid(txtDatos, 1, 500) & Chr(10) & Err.Description & Chr(10) & "¿Es esto lo buscado? "
If MsgBox(Texto, vbQuestion + vbYesNo, Titulo) = vbYes Then
txtDatos = "BIEN" & Chr(10) & Mid(txtDatos, 1, 500)
'Worksheets(i).Range(c.Address).Select
Exit Sub
Else
'Worksheets(i).Range(c.Address).Select
' Stop Por aqui se va el NO y sigue buscando
End If

' --------------------------

Set c = .FindNext(c) ' 65536
If c Is Nothing Then Exit Sub ' Por aqui se llega al final de la Hoja
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
'MsgBox "Fin de la hoja: "
End With

'MsgBox "FIN DE LA BUSQUEDA del todo"
Next i
MsgBox "Fin de la busqueda en todo el libro"
Exit Sub
' -------------------------------------------------------