Comment : regrouper des lignes dans une feuille de calcul

Article
08/10/2011

Vous pouvez regrouper une ou plusieurs lignes entières. Pour créer un groupe dans une feuille de calcul, utilisez un contrôle NamedRange ou un objet plage Excel natif.

S'applique à : Les informations contenues dans cette rubrique s'appliquent aux projets de niveau document et de niveau application pour Excel 2007 et Excel 2010. Pour en savoir plus, consultez Fonctionnalités disponibles par type d'application et de projet Office.

Utilisation d'un contrôle NamedRange

Si vous ajoutez un contrôle NamedRange à un projet au niveau du document au moment du design, vous pouvez utiliser ce contrôle pour créer un groupe par programme. L'exemple suivant suppose qu'il existe trois contrôles NamedRange sur la même feuille de calcul : data2001, data2002 et dataAll. Chaque plage nommée fait référence à une ligne entière dans la feuille de calcul.

Pour créer un groupe de contrôles NamedRange sur une feuille de calcul

Regroupez trois plages nommées en appelant la méthode Group de chaque plage. Ce code doit être placé dans une classe sheet et non dans la 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);

Notes

Pour dissocier des lignes, appelez la méthode Ungroup.

Utilisation de plages Excel natives

Le code suppose que vous possédez trois plages Excel nommées data2001, data2002 et dataAll dans une feuille de calcul.

Pour créer un groupe de plages Excel dans une feuille de calcul

Regroupez trois plages nommées en appelant la méthode Group de chaque plage. L'exemple suivant suppose que la feuille de calcul contient trois contrôles Microsoft.Office.Interop.Excel.Range nommés data2001, data2002 et dataAll. Chaque plage nommée fait référence à une ligne entière dans la feuille de calcul.

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);

Notes

Pour dissocier des lignes, appelez la méthode Ungroup.