Office: (Office 2013) Namen einer Zelle per VBA ermitteln

JuMathias · 16. März 2018

Hallo zusammen,

in meinem VBA muss ich den Namen einer Zelle auslesen.
Ich hoffte, dass man die Zahlen durch Variablen ersetzen kann.

Mein Ansatz:

i_Spalte_TC=9
i_Zeile_E =8

Cells(i_Spalte_TC, i_Zeile_E + 1).Name.Name

Wo legt dann da der Hund begraben ?

Ein Dankeschön für eure Antworten

JuMathias

:)

RPP63 · 18. März 2018

Moin!
Ich habe keinen blassen Schimmer, was Du wirklich willst!
Meinst Du mit dem "Namen" die Adresse, also
Cells(i_Spalte_TC, i_Zeile_E + 1).Address
?

Gruß Ralf

JuMathias · 18. März 2018

... dann hätte ich Adresse geschrieben.

Gruß

JuMathias

Luschi · 18. März 2018

Hallo

das geht nur so: Code:

Sub test1()
Dim na As String, s As String

na = ""
On Error Resume Next
na = ActiveCell.Name.Name
On Error GoTo 0
If na = "" Then
s = "Die aktive Zelle '" & ActiveCell.Address & "' hat keinen definierten Namen!"
Else
s = "Die aktive Zelle '" & ActiveCell.Address & "' h at den Namen '" & na & "'!"
End If
MsgBox s
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Gruß von Luschi
aus klein-Paris

RPP63 · 9. Februar 2021

von JuMathias

Mein Ansatz:

i_Spalte_TC=9
i_Zeile_E =8

Cells(i_Spalte_TC, i_Zeile_E + 1).Name.Name

Wo legt dann da der Hund begraben ?
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Mal davon abgesehen, dass es Cells(Zeile, Spalte) heißt, klappt das problemlos, wenn

Die Zelle einen Bereichsnamen hat und

.Name.Name irgendetwas zugewiesen wird

Ob jetzt einer Variablen oder Ausgabe per Debug.Print oder MsgBox …

JuMathias · 18. März 2018

Gruß

JuMathias

JuMathias · 18. März 2018

Hi,

Hintergrund: Eine VBA-Schleife wird durchlaufen und hat irgendwann eine Koordinate (X|Y) erreicht. Bei dieser Zelle wird dann der Name per VBA ausgelesen.
Ich wollte dann nicht unbedingt

ActiveCell.Address

nutzen

Gruß

JuMathias

EarlFred · 18. März 2018

... wenn ich die Adresse benötigt hätte ...

... dann hätte ich Adresse geschrieben.
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

mal abgesehen von der Patzigkeit:
Du durchläufst einen Bereich (wie sieht die Schleife aus?) und um "ActiveCell.Address" nicht verwenden zu müssen, fragst Du, wie man den Namen einer Zelle per VBA ermitteln kann, weil Du eigentlich ja wissen wolltest, ob man bei Cells() die Zeilen- und Spaltennummer durch Variablen ersetzen kann.

Alles klar!

JuMathias · 21. März 2018

Hallo Earl Fred,

die Schleifen ergeben sich durch Funktionen, die Werte liefern.
Diese weise ich dann Variablen zu (z.B.: i_Spalte_TC=9, i_Zeile_E =8).
Excel kennt nun die Zelle im Tab.Blatt und durch den Namen der Zelle geht es dann VBA mäßig weiter.

Das ist die Intension. Ich möchte im Forum nicht alles dokumentieren,
nur das Wesentliche. Sollte mir auch gelingen sein.

Ein Dankeschön für dein Feedback.

Gruß

JuMa

RPP63 · 21. März 2018

https://www.korrekturen.de/kurz_erkl...ntension.shtml

Ansonsten habe ich etwas dazu geschrieben.
Luschi wies Dich darauf hin, dass in einer Schleife die Fehlerbehandlung temporär ausgeschaltet werden muss (und innerhalb der Schleife wieder auf Zero gesetzt wird).
Also verstehe ich das Problem immer noch nicht.
Vielleicht bin ich auch zu blöd dafür.

Gruß Ralf

EarlFred · 21. März 2018

Sollte mir auch gelingen sein.
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

*top

rastrans · 21. März 2018

Hallo,

da eine Zelle auch zu mehreren Names gehören kann, hier eine Lösung, die alle Names-Benennungen ausgibt.

Gruß rastrans Code:

Function CellNames(Zelle As Range) As String
Dim nam As Name
Dim strResult As String

strResult = vbNullString
For Each nam In Names
If Not Intersect(Zelle, nam.RefersToRange) Is Nothing Then strResult = IIf(Len(strResult), strResult & ",", vbNullString) & nam.Name
Next
CellNames = strResult
End Function
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Office: (Office 2013) Namen einer Zelle per VBA ermitteln

Namen einer Zelle per VBA ermitteln

Namen einer Zelle per VBA ermitteln

Namen einer Zelle per VBA ermitteln

Namen einer Zelle per VBA ermitteln

Namen einer Zelle per VBA ermitteln - Similar Threads - Namen Zelle VBA

Überprüfen ob Tabellenballt mit Namen aus Zelle vorhanden ist

Verweis auf andere Datei aus Formel (=Name aus Zelle) möglich?

Frage zu Tutorial "Excel - Auswertung von farbigen Zellen"

[VBA] Alle namen einer Zelle ermitteln

VBA Speichern mit Name/Datum/Text aus verschiedenen Zellen

VBA Formel die automatisch die Zelle nach dem Namen zusammenrechnet

Feststellen, ob Zelle in benanntem Bereich?