0160-93 82 19 37 | Nehmen Sie 
Zelladresse in Spalten- und Zeilenangaben trennen
101084
Dieser Code trennt z. B. die Angabe der Adresse C15 in die Spalte C und in die Zeile 15. Die Trennung erfolgt mit der Funktion "Split".
Es ist gleichgültig, wie lange die Spaltenangabe bzw. die Zeilenangabe ist oder ob die Zellen relativ oder fix mit $ gekennzeichnet sind.
Die Trennung erfolgt immer richtig.
Public Sub spalte_zeile()
'Zelladresse in Spalten- und Zeilenangabe trennen
Dim wert() As String
wert = Split(Range("C15").Address, "$")
MsgBox "Spalte: " & wert(1) & Chr(13) & _
"Zeile: " & wert(2)
End Sub
