Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Kopie der Zellpositionsangabe aus ganz linker Menüleiste

Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 16:14:21
Dieter(Drummer)
Gute Tag an alle ...

ich möchte in der aktiven Zelle die Zellpostionsangabe aus der ganz linken Menüleiste kopieren und dann in der aktiven Zelle einfügen.
z.B. Zelle A5 ist markiert und in der Menüleiste ist die Angabe A5. Dann soll per Code diese A5 eingetragen werden.
Wenn in der Menüleiste Z5Z1 steht, weil ich die Spaltennamen auf Numerisch geändert habe, soll per Code auch Z5S1 eingetragen werden.

Ich habe bisher keine Code Möglichkeit gefunde, wie ich den Inhalt der ganz linken Menüleiste, also die Zellangabe, kopieren kann und in aktive Zelle einfügen kann.

Mit der Bitte um Hilfe, grüßt
Dieter(Drummer)

Die Spaltenbezeichung kann ich per Code wecheln, dies nur zur info:
Sub SpaltBez_ABC()

Application.ReferenceStyle = xlA1
End Sub


Sub SpaltBez_123()

Application.ReferenceStyle = xlR1C1
End Sub
Anzeige

18
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 16:35:44
Onur
"ich möchte in der aktiven Zelle die Zellpostionsangabe aus der ganz linken Menüleiste kopieren und dann in der aktiven Zelle einfügen. " ???
In "der ganz linken Menüleiste" steht immer die Adresse der AKTIVEN Zelle drin. Willst du echt der aktiven Zelle ihre eigene Adresse als Wert verpassen?
Anzeige
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 16:44:46
BoskoBiati2
Hi,
z.B. so:

Sub SpaltBez_ABC()

Application.ReferenceStyle = xlA1
Activecell=ActiveCell.Address(, , xlA1)
End Sub


analog für xlR1C1

Gruß

Edgar
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:00:30
Dieter(Drummer)
Danke Edgar.

Das wäre keine Lösung, wie ich sie mir vorstelle.
Mit Code 1, ), wird in aktiver Zelle $A$5 gezeigt und nicht A5:
Sub SpaltBez_Test()

Application.ReferenceStyle = xlA1
ActiveCell = ActiveCell.Address(, , xlA1)
End Sub


In Code 2, wird R5C1 gezeigt und nicht Z5S1:
Sub SpaltBez_Test2()

Application.ReferenceStyle = xlR1C1
ActiveCell = ActiveCell.Address(, , xlR1C1)
End Sub


Wenn es nicht möglich ist, eine Kopie der Zellangabe aus der ganz linken Menüleiste zu machen, geht es halt nicht.

Danke für Rückmeldung.

Gruß,
Dieter(Drummer)

Anzeige
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 16:45:04
Dieter(Drummer)
Danke Onur für Rückmeldung.

Ich möchte nur die Kopie der Zelladresse bekommen, und sie in die aktive Zelle so einfügen, wie sie in der linken Meneüleiste gezeigt wird.
Habe es mit Code aufzeichen probiert, geht aber nicht, da keine Kopie aufgezeichnet wird.

Mich interessiert einfach, wie der Code wäre ... Nicht alles ergibt immer einen Sinn ...
Wäre schön wenn es dennoch eine Lösung gibt.

Gruß, Dieter(Drummer)




Anzeige
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 16:55:14
Onur
"Ich möchte nur die Kopie der Zelladresse bekommen, und sie in die aktive Zelle so einfügen" ? Da steht die Adresse der AKTIVEN Zelle.

Private Sub CommandButton5_Click()

ActiveCell = ActiveCell.AddressLocal(, , Application.ReferenceStyle)
End Sub
Anzeige
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:06:08
Dieter(Drummer)
Danke Onur,

damit komme ich prima klar. Wenn Spaltenbezeichnung auf A, B, C ... steht, steht wohl in der markierten Zelle $A$5 und nicht A5.
Ich werde wohl finden, wie ich die Dollarzeichen noch weg bekomme.

Danke dir und Gruß,
Dieter(Drummer)
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:08:31
Onur
Nimm die Datei, die ich gerade gepostet habe.
Anzeige
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:21:26
RPP63
Die Dollar bekommst Du so weg:
ActiveCell = ActiveCell.AddressLocal(0, 0, Application.ReferenceStyle)
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:24:11
Onur
Vergiss es - dann sind die Z1S1 auch relativ und sehen so aus:
Z(-1)S(-2)
Du hast ja Recht …
25.07.2024 17:27:33
RPP63
… Z15S8 ist absolut, X42 relativ.
Der "Fehler" liegt im inkonsistenten Wunsch von Dieter.
Egal, Dieter ist zufrieden, dann bin ich es auch! ;)
Anzeige
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:10:27
Dieter(Drummer)
Danke Onur,

aber so etwas meinte ich nicht, Deine vorherige Lösung, die ich schon beantworet habe, hilft mir schon prima.
Gruß,
Dieter(Drummer)
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:16:29
Dieter(Drummer)
Danke Onur,

habe mir gerade deine Datei mal genauer angesehen und festgestellt, da stecken alle notwendigen Varianten drin, mit denen ich prima klar komme.
Herzlichen Dank.

Gruß,
Dieter(Drummer)
Anzeige
Gerne !
25.07.2024 17:17:28
Onur
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:12:44
Onur
Aber da ist auch das "Wegmachen der $"eingebaut:

ActiveCell = Replace(lz.AddressLocal(, , Application.ReferenceStyle), "$", "")
AW: Kopie der Zellpositionsangabe aus ganz linker Menüleiste
25.07.2024 17:19:14
Dieter(Drummer)
Danke Onur,

habe ich jetzt auch festgestellt. War da wohl mit meiner Mitteilung etwas voreilig.
Jetzt klappt es alles wie gewünscht.

Gruß,
Dieter(Drummer)
Anzeige
@Onur
25.07.2024 17:23:59
RPP63
Da der Default 1 ist bekommt man die $$ mit expliziter Benennung von 0 weg:
ActiveCell = ActiveCell.AddressLocal(0, 0, Application.ReferenceStyle)

Gruß Ralf
AW: @Onur
25.07.2024 17:24:52
Onur
Nein - Teste das mal mit R1C1 bzw Z1S1.
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige