Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in 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
  Namen vergleichen Mahkuss 13 193 13.02.2017, 06:52
Letzter Beitrag: steve1da
  Kartenleser, Zufallsystem einem Namen zu ordnen BenzinTanken1 1 38 10.02.2017, 17:47
Letzter Beitrag: Ego
  Namen Trennen in neue Blätter AKGUSTI 18 310 06.02.2017, 12:50
Letzter Beitrag: AlterDresdner
  RefersTo für Eintrag in Namensmanager zmichael27 5 148 22.01.2017, 13:29
Letzter Beitrag: zmichael27
Smile Chiffre aus Namen und Geburtsdatum automatisch erstellen elea007 5 176 09.01.2017, 16:35
Letzter Beitrag: lupo1
  Nach Namen sortieren - mit einer Bedingung swissbird 5 170 08.01.2017, 22:30
Letzter Beitrag: swissbird
  Addieren von Namen Tobias159 1 78 03.01.2017, 16:44
Letzter Beitrag: schauan
  Bezug auf andere Arbeitsmappe mit variablen Namen PhilippRoth 2 130 02.01.2017, 17:20
Letzter Beitrag: schauan
  Gibt es "Definierte Namen in aktueller Auswahl"?? LB1972 11 355 30.12.2016, 14:12
Letzter Beitrag: LB1972
  Gleiche Namen im Diagramm zusammenfassen Harry 7 413 21.12.2016, 23:11
Letzter Beitrag: Harry

Gehe zu:


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