Excel. Insertar fila que y borrar algunas de las celdas de la fila insertada

Con esta macro que usted ya conoce inserto una fila y borro los datos de la columna B de la fila insertada.

Cómo le indico que también borre los datos de la columna E y G ¿?

Sub insertafila()

    ActiveSheet.Unprotect

    Dim fila As Integer

    fila = ActiveCell.Row

    Rows(fila).Insert Shift:=xlDown

    Rows(fila + 1).Copy

    Rows(fila).PasteSpecial Paste:=xlPasteAll

    Range("f" & (fila + 1)).Clear

    Range("f" & (fila + 1)).Locked = False

    Range("J" & (fila)).Select

    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

End Sub

1 Respuesta

Respuesta
2

No limpia la columna B, limpia la columna F.

Después de esta línea

Range("f" & (fila + 1)).Clear

Pon estás líneas

Range("E" & (fila + 1)).Clear

Range("G" & (fila + 1)).Clear

sal u dos

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas