Tengo una macro que me elimina en orden descendente, como hacerlo en cualquier orden
Para ElsaMatilde: Hola esta es la macro de la pregunta anterior:
Private Sub CommandButton4_Click()
Dim wss As Worksheet
Dim eFila As Long
Set wss = Worksheets(6)
eFila = wss.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
If eFila > 3 Then
Rows(eFila - 1 & ":" & eFila - 1).Delete
Else
MsgBox "No hay mas filas para borrar"
End If
End Sub
1 Respuesta
Respuesta de Elsa Matilde
1