Procedura: raggruppare righe in un foglio di lavoro

Articolo
08/11/2011

È possibile raggruppare una o più righe intere. Per creare un gruppo in un foglio di lavoro, utilizzare un controllo NamedRange o un oggetto intervallo nativo di Excel.

Si applica a: le informazioni fornite in questo argomento sono valide per i progetti a livello di documento e di applicazione per Excel 2007 ed Excel 2010. Per ulteriori informazioni, vedere Funzionalità disponibili in base ai tipi di progetto e applicazioni di Office.

Utilizzo di un controllo NamedRange

Se si aggiunge un controllo NamedRange a un progetto a livello di documento in fase di progettazione, è possibile utilizzare il controllo per creare un gruppo a livello di codice. Nell'esempio seguente si presuppone che siano presenti tre controlli NamedRange nello stesso foglio di lavoro: data2001, data2002 e dataAll. Ogni intervallo denominato fa riferimento a una riga intera nel foglio di lavoro.

Per creare un gruppo di controlli NamedRange su un foglio di lavoro

Raggruppare tre intervalli denominati chiamando il metodo Group di ciascun intervallo. Il codice deve essere inserito in una classe Sheet e non nella classe ThisWorkbook.

With Me
    .data2001.Group()
    .data2002.Group()
    .dataAll.Group()
End With

this.data2001.Group(missing, missing, missing, missing);
this.data2002.Group(missing, missing, missing, missing);
this.dataAll.Group(missing, missing, missing, missing);

Nota

Per separare le righe, chiamare il metodo Ungroup.

Utilizzo di intervalli nativi di Excel

Nel codice si presuppone che siano presenti tre intervalli di Excel denominati data2001, data2002 e dataAll in un foglio di lavoro.

Per creare un gruppo di intervalli di Excel in un foglio di lavoro

Raggruppare tre intervalli denominati chiamando il metodo Group di ciascun intervallo. Nell'esempio seguente si presuppone che siano presenti tre controlli Microsoft.Office.Interop.Excel.Range denominati data2001, data2002 e dataAll nello stesso foglio di lavoro. Ogni intervallo denominato fa riferimento a una riga intera nel foglio di lavoro.

With Me.Application
    .Range("data2001").Group()
    .Range("data2002").Group()
    .Range("dataAll").Group()
End With

this.Application.get_Range("data2001", missing)
    .Group(missing, missing, missing, missing);

this.Application.get_Range("data2002", missing)
    .Group(missing, missing, missing, missing);

this.Application.get_Range("dataAll", missing)
    .Group(missing, missing, missing, missing);

Nota

Per separare le righe, chiamare il metodo Ungroup.