Herbers Excel-Forum - das Archiv

Alle Bereichsnamen löschen

Bild

Betrifft: Alle Bereichsnamen löschen
von: Peter

Geschrieben am: 16.03.2005 08:35:48

Guten Tag
Per VBA kann ich in einem Workbook über 500 Bereichsnamen ab einer Namenliste definieren. Das klappt bestens.
Gibt es eine Möglichkeit alle vergebenen Bereichsnamen auch über VBA auf einmal zu löschen?
Danke zum Voraus für eure Hilfe.
Freundliche Grüsse
Peter
Bild

Betrifft: AW: Alle Bereichsnamen löschen
von: Matthias G
Geschrieben am: 16.03.2005 08:57:21
Hallo Peter,
z.B. so:
Sub NamenLöschen()
Dim i
With ActiveWorkbook
i = .Names.Count
Do While i > 0
.Names(i).Delete
i = .Names.Count
Loop
End With
End Sub
Gruß Matthias
Bild

Betrifft: AW: Alle Bereichsnamen löschen
von: u_
Geschrieben am: 16.03.2005 08:57:36
Hallo,
meines Wissens nur über eine Schleife.
Sub namen_weg()
Dim n As Name
For Each n In ActiveWorkbook.Names
n.Delete
Next n
End Sub

Gruß
Bild

Betrifft: AW: Alle Bereichsnamen löschen
von: bst
Geschrieben am: 16.03.2005 08:58:16
Morgen Peter,
versuch mal sowas.
cu, Bernd
--
Option Explicit
Sub NoNames()
Dim n As Name
For Each n In ActiveWorkbook.Names
n.Delete
Next
End Sub

Bild

Betrifft: AW: Alle Bereichsnamen löschen
von: bst
Geschrieben am: 16.03.2005 08:58:21
Morgen Peter,
versuch mal sowas.
cu, Bernd
--
Option Explicit
Sub NoNames()
Dim n As Name
For Each n In ActiveWorkbook.Names
n.Delete
Next
End Sub

Bild

Betrifft: AW: Alle Bereichsnamen löschen
von: Peter

Geschrieben am: 16.03.2005 11:08:37

Hallo Matthias und Bernd
.. und so einfach ist es zu lösen!!
Nur sollte man trotz Stress selbst draufkommen.
Herzlichen Dank für eure Tipps. Es klappt vorzüglich.
Ich wünsche euch einen sonnigen Tag.
Gruss
Peter
 Bild
Excel-Beispiele zum Thema "Alle Bereichsnamen löschen"
Den selben Bereichsnamen in mehreren Tabellenblättern Serie von Bereichsnamenteilen einer Arbeitsmappe ändern
Bereichsnamen ermitteln und als Kommentare anzeigen Bereichsnamen in UserForm-ListBox auflisten und editieren
Zugriff auf Zellen unter Verwendung eines Bereichsnamens Mit VBA-Routine Bereichsnamen festlegen und ändern
Bereichsnamen in Namenn ohne Umlaute umwandeln