Excel Makro Aktive Zelle

pechia

Mitglied
Excel Makro, Adresse der aktiven Zelle bestimmen

Ich benötige in einem Excel-Makro die Adresse der aktiven (markierten) Zelle, damit ich in der entsprechenden Spalte einen Wert einfügen kann. Deshalb muss ich die Zeilennummer ableiten können.

- Kann mir jemand einen Tipp geben?
- Wo kann ich weitere Angaben über Syntax und Struktur von VBA finden?

Herzlichen Dank für alle Antworten.
 

mac7

Stammgast
Seiten mit Info's zu VBA gibt es im WWW einige.

--> Link zu Microsoft Visual Basic
Hier kannst du auch ein E-Book kostenlos downloden
--> Link zu einer anderen VBA-Seite
Eine informative Seite mit vielen Bespielen

Ein Makro für das Anzeigen der Adresse der aktiven Zelle könnte z.B. so aussehen:
Code:
Sub Zelladresse()

    With ActiveCell
        MsgBox .Address
    End With

End Sub
In diesem Beispiel ist die Ausgabe der Zelladresse in einer Messagebox. Wenn sich die aktivierte Zelle in Zeile 10 und Spalte 3 befindet, ist die Ausgabe $C$10

gruss mac
 

pechia

Mitglied
Seiten mit Info's zu VBA gibt es im WWW einige.

--> Link zu Microsoft Visual Basic
Hier kannst du auch ein E-Book kostenlos downloden
--> Link zu einer anderen VBA-Seite
Eine informative Seite mit vielen Bespielen

Ein Makro für das Anzeigen der Adresse der aktiven Zelle könnte z.B. so aussehen:
Code:
Sub Zelladresse()

    With ActiveCell
        MsgBox .Address
    End With

End Sub
In diesem Beispiel ist die Ausgabe der Zelladresse in einer Messagebox. Wenn sich die aktivierte Zelle in Zeile 10 und Spalte 3 befindet, ist die Ausgabe $C$10

gruss mac
Vielen Dank!
Das Beispiel funktioniert tiptop, nur sollte dieses Resulatat in einer bestimmten Zelle (z.B. A10 im aktiven Tabellenblatt) angezeigt werden.
Vielen Dank für die Antwort.
 

mac7

Stammgast
Für das brauchst du aber kein Makro. Das geht auch einfacher.

In der gewünschten Zelle, welche die Adresse anzeigen soll fügst du die folgende Funktion ein:

=ZELLE("Adresse";A10)

A10 ist in diesem Beispiel die Zelle, von der du die Adresse benötigst.
 
Oben