Actividad pública reciente
Ha valorado "Excelente" la respuesta
Buscar y reemplazar datos asociado excel vba
sub buscar() valor = range("a1").value Set h = Sheets("BD") Set b = h.Columns("A").Find(valor) If Not b Is Nothing Then range("a3") = h.Cells(b.Row, "B") range("a4") = h.Cells(b.Row, "C") range("a5") = h.Cells(b.Row, "D") range("a6") = h.Cells(b.Row,...