Zelladresse in Spalten- und Zeilenangaben trennen

101084



Dieser Code trennt 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 beziehungweise die Zeilenangabe ist oder ob die Zellen relativ oder fix mit $ gekennzeichnet sind.

Die Trennung erfolgt mit dem untenstehenden VBA-Code immer korekt.

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