[Excel] Adresse einer Zelle / eines Bereiches ermitteln
Gepostet am: Jun 15, 2011 10:19:45 PM
In Excel gibt es zwar eine Funktion, die anhand der übergebenen Spalte und Zeile die Adresse einer bestimmten Zelle zurückgibt (siehe Funktion ADRESSE), jedoch keine Funktion, die die Adresse einer markierten Zelle ermittelt. Das ist eigentlich nur die halbe Wahrheit. Man kann durchaus mit der Excel Funktion ADRESSE die Adresse einer markierten Zelle ermitteln, und zwar folgendermaßen:
Das einzige, was man - meines Wissens nach - nicht direkt machen kann ist eine relative Adresse zu ermitteln.
Funktion Zelladresse
Public Function ZellAdresse(Bereich As range, _ Optional ZeileAbs As Boolean = False, Optional SpalteAbs As Boolean = False, _ Optional bZellbezuege As Boolean = True, Optional RelativTo As range) As String If IsMissing(RelativTo) Then RelativTo = range("A1") Else If bZellbezuege = True Then bZellbezuege = False End If End If If bZellbezuege = True Then ZellAddresse = Bereich.Address(ZeileAbs, SpalteAbs, xlA1) Else ZellAddresse = Bereich.AddressLocal(ZeileAbs, SpalteAbs, xlR1C1, , RelativTo) End IfEnd Function