Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Friedrichroda /
Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.

Namen im Namensmanager loeschen...
#1
heje excelfreunde,

habe nachfolgendes makro erstelle:

Sub AlleNamenLoeschen()
With ActiveWorkbook
.Names("B11_TMListe").Delete
.Names("B12_TMListe").Delete
.Names("B13_TMListe").Delete
.Names("B14_TMListe").Delete
.Names("B15_TMListe").Delete
.Names("B16_TMListe").Delete
.Names("B17_TMListe").Delete
.Names("B18_TMListe").Delete
.Names("BlattZaehlerListe").Delete
.Names("Print_Area").Delete
.Names("Gehölz").Delete
.Names("Gehölzliste").Delete

noch viel mehr Namen, die zu löschen sind...

.Names("rS13.Tab_01").Delete
.Names("rS13.Tab_02").Delete
.Names("rS13.Tab_03").Delete
.Names("rS13.Tab_04").Delete
.Names("rS13.Tab_05").Delete
.Names("rS13.Tab_06").Delete
.Names("SchemaBemerkung").Delete
.Names("SchemaBezeichnung").Delete
.Names("SchemaName").Delete
.Names("VorgKFMaßnahmenbezeichnungen").Delete
.Names("VorgLFMaßnahmenbezeichnungen").Delete
End With
End Sub

dieses makro wird beim erstellen einer exporttabelle durch call ...AlleNamenLoeschen aufgerufen.
das loeschen funktioniert und ist nicht das thema.
hier das problem: wie kann man den loeschvorgang = ablauf des makros beschleunigen. soll heissen, wie muss das makro geschickter programmiert werden, so dass der loeschvorgang flott von statten geht.
Vielen Dank
--Janosch
                                                     
Excel 2007 (SP3), Win 10 Pro                              
to top
#2
Hallo Janosch,

Code:
Sub AlleNamenLoeschen()
  Dim oName As Name
  For Each oName In ActiveWorkbook.Names
    oName.Delete
  Next oName
End Sub

Gruß Uwe
to top
#3
heje uwe

das wars. vielen dank...
Vielen Dank
--Janosch
                                                     
Excel 2007 (SP3), Win 10 Pro                              
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  Bis zu dem Aktuellen Datum einen Namen Zählen microsuck 1 41 16.03.2017, 11:41
Letzter Beitrag: steve1da
  Namen vergleichen Mahkuss 13 256 13.02.2017, 06:52
Letzter Beitrag: steve1da
  Kartenleser, Zufallsystem einem Namen zu ordnen BenzinTanken1 1 63 10.02.2017, 17:47
Letzter Beitrag: Ego
  Namen Trennen in neue Blätter AKGUSTI 18 404 06.02.2017, 12:50
Letzter Beitrag: AlterDresdner
  RefersTo für Eintrag in Namensmanager zmichael27 5 196 22.01.2017, 13:29
Letzter Beitrag: zmichael27
Smile Chiffre aus Namen und Geburtsdatum automatisch erstellen elea007 5 248 09.01.2017, 16:35
Letzter Beitrag: lupo1
  Nach Namen sortieren - mit einer Bedingung swissbird 5 275 08.01.2017, 22:30
Letzter Beitrag: swissbird
  Addieren von Namen Tobias159 1 121 03.01.2017, 16:44
Letzter Beitrag: schauan
  Bezug auf andere Arbeitsmappe mit variablen Namen PhilippRoth 2 210 02.01.2017, 17:20
Letzter Beitrag: schauan
  Gibt es "Definierte Namen in aktueller Auswahl"?? LB1972 11 560 30.12.2016, 14:12
Letzter Beitrag: LB1972

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste