Inhaltsverzeichnis
In diesem Tutorial wird gezeigt, wie Sie die Adresse einer Zelle abrufen.
Bereichsadresse abrufen
Dadurch wird die Zellenadresse mit dem Range-Objekt angezeigt:
| 1 | MsgBox Range("A1").Adresse |
Zellenadresse abrufen
Dadurch wird die Zellenadresse mit dem Cells-Objekt angezeigt:
| 1 | MsgBox Cells(1,1).Adresse |
ActiveCell-Adresse
Um die ActiveCell-Adresse zu erhalten, verwenden Sie diesen Code:
| 1 | MsgBox ActiveCell.Address |
Variable auf Zellenadresse setzen
Sie können die Zellenadresse auch einer String-Variablen zuweisen, um sie in Ihrem Code einfach verwenden zu können:
| 1234 | Dim strAddressstrAddress = Range("A1").AddressMsgBox strAddress |
Zeilennummer von Zellenadresse abrufen
Dieser Code extrahiert die Zeilennummer aus einer Adresse:
| 1234567891011 | Sub GetRowNumberFromCellAddress()Dim strAddress As StringDim Rownum As LongstrAddress = Range("A1:a10").AddressRownum = Range(strAddress).RowMsgBox ZeilennummerEnd Sub |
Normalerweise können Sie jedoch diesen viel einfacheren Code verwenden:
| 1 | MsgBox Range("A1").Row |
