Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1192to1196
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
Inhaltsverzeichnis

Prüfen ob Name in Formel verwendet

Prüfen ob Name in Formel verwendet
Heinz
Hallo Excellenten,
ich wünsche Euch einen Guten Morgen
... und habe da mal eine Frage.
In einem Dokument sind über Jahre für einzelne Bereiche immer wieder
Namen vergeben worden, die ggf. nicht mehr notwendig sind.
Wie kann ich innerhalb eines Dokumentes prüfen (ohne VBA), ob ein vergebener Bereichsname
in irgend einer Formel Verwendung findet?
Ich freue mich auf Eure Vorschläge.
Heinz

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Prüfen ob Name in Formel verwendet
13.01.2011 10:30:18
Eugen
Hallo Heinz
ich fürchte da wirst Du Dir ohne VBA die Nase platt drücken.
Option Explicit
Option Base 1
Public Sub test()
Dim oCell As Range, i As Long
Dim aNames() As String
ReDim aNames(1)
aNames(1) = "Falsch"
For i = 1 To ActiveWorkbook.Names.Count
If aNames(1) = "Falsch" Then
aNames(1) = ActiveWorkbook.Names(i).Name
Else
ReDim Preserve aNames(UBound(aNames) + 1)
aNames(UBound(aNames)) = ActiveWorkbook.Names(i).Name
End If
Next i
Debug.Print "Folgende Namen sind definiert :"
For i = 1 To UBound(aNames)
Debug.Print aNames(i)
Next i
ActiveSheet.UsedRange.Select
For Each oCell In Selection
If oCell.HasFormula Then
For i = 1 To UBound(aNames)
If InStr(oCell.FormulaLocal, aNames(i)) > 0 Then
Debug.Print aNames(i) + " wird verwendet !"
End If
Next i
End If
Next oCell
End Sub
der makro produziert dann folgenden output
Folgende Namen sind definiert :
Name
Test1
Test3
Name wird verwendet !
gruss
eugen
Anzeige
AW: Prüfen ob Name in Formel verwendet
13.01.2011 11:18:57
Timo
Hallo Heinz, Hallo Eugen,
eine Möglichkeit "halb zu Fuß" und ohne VBA gibt es noch:
Über F3 - Liste einfügen die Bereichsnamen auflisten lassen und dann über die Suche (STRG+F, in Optionen "Suchen in" Formeln angeben) die einzelnen Bereichsnamen durchackern.
Oder über STRG+H die Bereichsnamen gleich durch anderes ersetzen.
Gruß
Timo
Timo, guter Vorschlag owT
13.01.2011 16:39:02
Heinz

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige