Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
444to448
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
444to448
444to448
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellnamen prüfen

Zellnamen prüfen
29.06.2004 22:26:06
ThomWag
Wie kann man prüfen, ob die aktuelle Auswahl in einer Tabelle einem Namen zugeordnet ist, ohne die Liste aller ActiveWorkbook.Names zu durchsuchen und mit dem aktuellen Range zu vergleichemn ?
Beispiel Zelle F25 ist der Name Eingabe_07 zugeordnet
ActiveWorkbook.Names.Add Name:="Eingabe_07", _
RefersToR1C1:= "='Werte 02'!R25C6"
Wird nun ein Makro gestartet möchte ich prüfen, ob der
Bediener auf einer Zelle / Auswahl steht, die einem
Namen Eingabe* zugeordnet ist.
Sonst würde ich eine seperate Liste mit Eingabezellen anlegen
und sie anhand dieser Liste prüfen, aber mit den Namen fände
ich es vielseitiger/besser.
Oder hat einer eine bessere Idee ???
Vielen Dank schon mal.....

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellnamen prüfen
29.06.2004 22:37:26
Josef Ehrensberger
Hallo ? (ein Name währe nett! Und realnames sind hier üblich)
Probier mal.

Sub checkNames()
Dim myName As Name
For Each myName In ThisWorkbook.Names
If Not Intersect(Selection, Range(myName)) Is Nothing Then
MsgBox "Auswahl schneidet den benannten Bereich """ & myName.NameLocal & """ !"
Else
MsgBox "Auswahl schneidet keinen benannten Bereich!"
End If
Next
End Sub

Gruß Sepp
AW: Zellnamen prüfen
29.06.2004 22:44:54
Ulf
Interessant, gibt es ein praktisches Beispiel, wozu die Prüfung nötig
ist?
Ulf

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige