[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