Anzeige
Archiv - Navigation
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
280to284
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Namen aus allen Tabellen löschen

Namen aus allen Tabellen löschen
17.07.2003 11:16:48
Micha.hal
Hallo Excelperten,
ich habe in 34 Tabellen einer Datei jeweils 18 Namen vergeben. Diese möchte ich nun wieder löschen. Versuche ich das per Makro:
Sheets("1").Select
ActiveWorkbook.Names("ABC").Delete
erhalte ich den Fehler:
Anwendungs- oder objektdefinierter Fehler.
Kann ich das Löschen dieser Namen automatisieren?
Danke für die Hilfe.
Micha

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Namen aus allen Tabellen löschen
17.07.2003 11:57:18
Micha.hal
An alle Antworter:
Perfekt, wieder viel Zeit gespart.
Danke
Micha

AW: Namen aus allen Tabellen löschen
17.07.2003 11:28:59
galenzo
So?

Private Sub DelNames()
For Each z In Application.Names
z.Delete
Next
End Sub


AW: Namen aus allen Tabellen löschen
17.07.2003 11:25:49
Knut
Option Explicit

Sub Namen_weg()
Dim objName As Object
For Each objName In ActiveWorkbook.Names
objName.Delete
Next
End Sub

Knut

AW: Namen aus allen Tabellen löschen
17.07.2003 11:24:38
FCH
Hi Micha,
versuche es hiermit:

Sub wegdamit()
Dim i As Long
For i = 1 To ActiveWorkbook.Names.Count
ActiveWorkbook.Names(1).Delete
Next i
End Sub

Gruß
FCH

Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige