Proprietà Range.Proprietà Rows (Excel)

• 05/11/2019
• 2 minuti per leggere
• • o
  • M
  • O
  • k
  • K
  • +2

Ritorna un oggetto Range che rappresenta le righe nel range specificato.

Sintassi

expression.Rows

expression Una variabile che rappresenta un oggetto Range.

Remarks

Per restituire una singola riga, usate la proprietà Item o equivalentemente includete un indice tra parentesi. Per esempio, sia Selection.Rows(1) che Selection.Rows.Item(1) restituiscono la prima riga della selezione.

Quando viene applicata ad un oggetto Range che è una selezione multipla, questa proprietà restituisce solo le righe della prima area del range. Per esempio, se l’oggetto Range someRange ha due aree-A1:B2 e C3:D4-,someRange.Rows.Count restituisce 2, non 4. Per utilizzare questa proprietà su un intervallo che può contenere una selezione multipla, testate Areas.Count per determinare se l’intervallo è una selezione multipla. Se lo è, fate un ciclo su ogni area nell’intervallo, come mostrato nel terzo esempio.

L’intervallo restituito potrebbe essere fuori dall’intervallo specificato. Per esempio, Range("A1:B2").Rows(5) restituisce le celle A5:B5. Per maggiori informazioni, vedi la proprietà Item.

Utilizzare la proprietà Rows senza un qualificatore di oggetto equivale a utilizzare ActiveSheet.Rows. Per maggiori informazioni, vedi la proprietà Worksheet.Rows.

Esempio

Questo esempio cancella l’intervallo B5:Z5 sul foglio1 della cartella di lavoro attiva.

Worksheets("Sheet1").Range("B2:Z44").Rows(3).Delete

Questo esempio elimina le righe nella regione corrente sul foglio di lavoro uno della cartella di lavoro attiva dove il valore della cella uno nella riga è uguale al valore della cella uno nella riga precedente.

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

Questo esempio visualizza il numero di righe nella selezione sul foglio1. Se è selezionata più di un’area, l’esempio passa attraverso ogni area.

Public Sub ShowNumberOfRowsInSheet1Selection Worksheets("Sheet1").Activate Dim selectedRange As Excel.Range Set selectedRange = Selection Dim areaCount As Long areaCount = Selection.Areas.Count If areaCount <= 1 Then MsgBox "The selection contains " & _ Selection.Rows.Count & " rows." Else Dim areaIndex As Long areaIndex = 1 For Each area In Selection.Areas MsgBox "Area " & areaIndex & " of the selection contains " & _ area.Rows.Count & " rows." areaIndex = areaIndex + 1 Next End IfEnd Sub

Supporto e feedback

Hai domande o feedback su Office VBA o su questa documentazione? Vedi supporto e feedback di Office VBA per una guida sui modi in cui puoi ricevere supporto e fornire feedback.