Gewusst wie: Löschen von Gruppen in Arbeitsblättern

Artikel
04/28/2010

Aktualisiert: November 2007

Betrifft
Die Informationen in diesem Thema gelten nur für die angegebenen Visual Studio Tools for Office-Projekte und Versionen von Microsoft Office. Projekttyp Projekte auf Dokumentebene Projekte auf Anwendungsebene Microsoft Office-Version Excel 2003 Excel 2007 Weitere Informationen finden Sie unter Verfügbare Features nach Anwendung und Projekttyp.

Die Informationen in diesem Thema gelten nur für die angegebenen Visual Studio Tools for Office-Projekte und Versionen von Microsoft Office.

Projekttyp

Projekte auf Dokumentebene
Projekte auf Anwendungsebene

Microsoft Office-Version

Excel 2003
Excel 2007

Weitere Informationen finden Sie unter Verfügbare Features nach Anwendung und Projekttyp.

Wenn sich Gruppen von NamedRange-Steuerelementen oder systemeigenen Excel-Bereichsobjekten in einem Arbeitsblatt befinden, können Sie diese Gruppierung aufheben.

Aufheben der Gruppierung von NamedRange-Steuerelementen

Im folgenden Codebeispiel wird davon ausgegangen, dass in Ihrem Arbeitsblatt die folgenden drei zuvor gruppierten Microsoft.Office.Tools.Excel.NamedRange-Steuerelemente vorhanden sind: data2001, data2002 und dataAll.

So löschen Sie Gruppen von NamedRange-Steuerelementen in einem Arbeitsblatt

Rufen Sie die Ungroup-Methode auf. Der Code muss in eine Sheet-Klasse, nicht in die ThisWorkbook-Klasse, eingefügt werden.

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

this.data2001.Ungroup();
this.data2002.Ungroup();
this.dataAll.Ungroup();

Aufheben der Gruppierung von systemeigenen Excel-Bereichen

In diesem Codebeispiel wird davon ausgegangen, dass Sie dem Arbeitsblatt drei systemeigene Excel-Bereiche programmgesteuert hinzugefügt und gruppiert haben: data2001, data2002 und dataAll.

So löschen Sie Gruppen von Excel-Bereichen in einem Arbeitsblatt

Rufen Sie die Ungroup-Methode auf.

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

this.Application.get_Range("data2001", missing).Ungroup();
this.Application.get_Range("data2002", missing).Ungroup();
this.Application.get_Range("dataAll", missing).Ungroup();