|
|
|
Thema:
|
Excel 97, 2000 und 2002 |
|
Problem:
|
Im Dialogfeld EINFÜGEN-NAME-DEFINIEREN lässt
sich immer nur ein Eintrag nach dem anderen markieren und dann löschen.
Ich möchte in einigen Fällen alle Namensdefinitionen aus einer Datei
entfernen und da ist diese Methode sehr umständlich. Gibt es eine
einfachere Möglichkeit? |
|
Lösung:
|
Eine Standardfunktion von Excel kann da nicht
helfen, aber mit einem kleinen VBA-Makro kommen Sie weiter:
Sub procAlleNamenLoeschen()
Dim varName As Name
Dim intResponse As Integer
intResponse = MsgBox("Alle Namen löschen?", _
vbYesNo, "Excel Tipps")
If intResponse = vbNo Then Exit Sub
For Each varName In ActiveWorkbook.Names
varName.Delete
Next varName
End Sub
Nachdem Sie dieses Makro im VBA-Editor eingegeben und gestartet haben,
erscheint eine Sicherheitsabfrage, die einfach mit JA beantworten.
Alle Namen der aktuellen Arbeitsmappe werden dann automatisch gelöscht.
Bitte beachten Sie dabei, dass dieser Vorgang nicht rückgängig
gemacht werden kann!
|
|
