Encontrar datos repetidos en un listado
Tengo un listado de referencias las cuales están asociadas a unas cantidades y a unos almacenes diferentes, requiero formular o generar una herramienta que me permita digitar la referencia y que el resultado sea un listado de detallado de existencias o cantidades por cada almacén.
H o l a:
Para crear la fórmula o la macro necesito saber cómo tienes los datos y cómo quieres el resultado.
Podrías enviarme un archivo de ejemplo, en una hoja me muestras con datos reales y en otra hoja me pones el resultado que esperas, es importante que en la hoja de resultados pongas los mismos datos que tienes en la hoja de referencias, es decir, debes llenar la hoja con los datos que quieres que aparezcan. Entre mejor tengas tu ejemplo más fácil será entender lo que necesitas.
H o l a:
Te anexo la macro para realizar la búsqueda
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
If Target.Count > 1 Then Exit Sub
If Target.Address(False, False) = "C2" Then
ActiveSheet.UsedRange.Offset(4, 0).Clear
Set h = Sheets("CONSOLIDADO")
Set r = h.Columns("A")
Set b = r.Find(Target, lookat:=xlWhole)
i = 5
If Not b Is Nothing Then
ncell = b.Address
Do
Cells(i, "B") = Target
Cells(i, "C") = h.Cells(b.Row, "B")
Cells(i, "D") = h.Cells(b.Row, "F")
Cells(i, "E") = h.Cells(b.Row, "G")
Set b = r.FindNext(b)
i = i + 1
Loop While Not b Is Nothing And b.Address <> ncell
End If
If i = 5 Then
MsgBox "No hay registros con ese número de Placa", vbExclamation
End If
End If
End Sub‘
S a l u d o s . D a n t e A m o r. Recuerda valorar la respuesta. G r a c i a s
