Anzeige
Archiv - Navigation
464to468
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
464to468
464to468
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Namen löschen, aber nur die auf akt. Blatt

Namen löschen, aber nur die auf akt. Blatt
06.08.2004 16:24:12
Heinz
Liebe Excellenten,
ich möchte gerne mit VBA die vergebenen Namen löschen,
aber eben nur die, die sich auf das activeSheet beziehen.
Also sinngemäß eine adpatierte Lösung für
Dim n as Name
For each n in activeWorkbook.Names
n.delete
Next
aber statt aktiveWorkbook hätte ich gerne activeSheet.
Habt Ihr ne Idee?
Heinz

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Namen löschen, aber nur die auf akt. Blatt
06.08.2004 16:40:55
Annett
Hallo Heinz

Sub Namen_loeshen()
'   nur im Activen Register
Dim y As Integer, z As String
Dim rng As Range
For y = 1 To Names.Count
z = Names(y).Name
If Range(z).Worksheet.Name = ActiveSheet.Name Then Range(z).Name.Delete
Next
End Sub

Gruß Annett
AW: Namen löschen, aber nur die auf akt. Blatt
06.08.2004 16:41:26
Annett
Hallo Heinz

Sub Namen_loeshen()
'   nur im Activen Register
Dim y As Integer, z As String
Dim rng As Range
For y = 1 To Names.Count
z = Names(y).Name
If Range(z).Worksheet.Name = ActiveSheet.Name Then Range(z).Name.Delete
Next
End Sub

Gruß Annett
Anzeige
AW: Namen löschen, aber nur die auf akt. Blatt
Ulf
Da hast du aber einen krassen Denkfehler drin.
Ulf
AW: Namen löschen, aber nur die auf akt. Blatt
07.08.2004 13:39:06
Annett
Hallo Ulf
das Forum ist dazu da um Wissen auszutauschen. Dein Beitrag sagt mir überhaupt nichts.
Gruß Annett
AW: Namen löschen, aber nur die auf akt. Blatt
Ulf
Dann probier deinen Code doch einfach mal aus. Wo steht geschrieben, dass sich ein Name in einem Sheet auf dasselbe Sheet beziehen muss?
Ulf
AW: Namen löschen, aber nur die auf akt. Blatt
07.08.2004 18:08:02
Annett
Hallo Ulf
Code teste ich zu 99% und den Code habe ich getestet.
Gruß Annett
Anzeige
AW: Namen löschen, aber nur die auf akt. Blatt
Ulf
Dim n as integer
For n = 1 to activeSheet.Names.count
on error resume next
activeSheet.Names(n).delete
Next
Ulf

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige