Macro para filtrar datos y cambiar valor de celda según criterio

Como dice el titulo quiero ver si alguien puede ayudarme con una macro que necesito haga lo siguiente:

1) Crear un filtro en una hoja de un libro en la columna "S" según el criterio "INCES" una ves realizado este filtro haga lo siguiente:

2) Los datos filtrados ahora en la columna "B" cambie los datos de esa columna por el valor "3"

3) Borrar filtro y mostrar todos los datos de la hoja

1 respuesta

Respuesta
1

Te anexo la macro

Sub Cambiar_Dato()
'Por.Dante Amor
    For i = 2 To Range("S" & Rows.Count).End(xlUp).Row
        If Cells(i, "S") = "INCES" Then
            Cells(i, "B") = 3
        End If
    Next
    MsgBox "fin"
End Sub

.

'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias

.

Avísame cualquier duda

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas