Macro pero con ubicacion de hoja
La situación es la siguiente tengo una macro que me da los números repetidos y al lado su ubicación de celda en todo el libro pero quisiera que la ubicación me la diera por hoja o el nombre de la hoja agradezco su atención
1 Respuesta
Sub BuscarNumero()
'Por.Dante Amor
num = Hoja14.[TA1]
For h = 1 To 13
Set b = Sheets(h).Cells.Find(num, lookat:=xlWhole)
If Not b Is Nothing Then
cad = cad & "," & Sheets(h).Name
End If
Next
If cad <> "" Then
cad = Mid(cad, 2)
Hoja14.[TB1] = cad
End If
End Sub
Esta macro es la solución a la pregunta pero como puedo hacer para que todo lo que coloque en la columna TA me de la misma información en TB
Podrías intentar colocando lo siguiente:
Hoja14.[TB1] = cad & sheets(h).name
Tal vez pueda solucionar tu problema, so no me cuentas y buscamos otra solución
