Propiedad Application.Rows (Excel)
Devuelve un objeto Range que representa todas las filas de la hoja de cálculo activa. Si el documento activo no es una hoja de cálculo, se produce un error en la propiedad Rows . Objeto Range de solo lectura.
Sintaxis
expresión. Filas
expresión Variable que representa un objeto Application.
Comentarios
El uso de esta propiedad sin un calificador de objeto equivale a usar ActiveSheet.Rows.
Cuando se aplica a un objeto Range que es una selección múltiple, esta propiedad devuelve filas solo del primer área del intervalo. Por ejemplo, si el objeto Range tiene dos áreas: A1:B2 y C3:D4, Selection.Rows.Count devuelve 2, no 4.
Si quiere usar esta propiedad en un rango que puede contener una selección múltiple, compruebe Areas.Count para determinar si el rango es una selección múltiple. En ese caso, ejecute un bucle sobre cada área del rango, tal como se muestra en el tercer ejemplo.
Ejemplo:
En este ejemplo se elimina la fila tres de Sheet1.
Worksheets("Sheet1").Rows(3).Delete
En este ejemplo se eliminan las filas de la región actual de la hoja de cálculo uno en las que el valor de la celda uno de la fila es el mismo que el valor de la celda uno de la fila anterior.
For Each rw In Worksheets(1).Cells(1, 1).CurrentRegion.Rows
this = rw.Cells(1, 1).Value
If this = last Then rw.Delete
last = this
Next
En este ejemplo se muestra el número de filas de la selección de Sheet1. Si se ha seleccionado más de un área, el ejemplo ejecuta un bucle en cada área.
Worksheets("Sheet1").Activate
areaCount = Selection.Areas.Count
If areaCount <= 1 Then
MsgBox "The selection contains " & _
Selection.Rows.Count & " rows."
Else
i = 1
For Each a In Selection.Areas
MsgBox "Area " & i & " of the selection contains " & _
a.Rows.Count & " rows."
i = i + 1
Next a
End If
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.