Herbers Excel-Forum - das Archiv

Text spiegeln

Bild

Betrifft: Text spiegeln
von: Andreas K.

Geschrieben am: 24.02.2005 10:39:29
Hallo,
hat jemand eine Idee, wie man mit einem Befehlssatz den Textinhalt einer Zelle unabhängig von der Anzahl Zeichen spiegeln kann?
Ciao Andreas
Bild

Betrifft: AW: Text spiegeln
von: Matthias G
Geschrieben am: 24.02.2005 10:45:19
Hallo Andreas,
Function Spiegeln(z)
Dim i As Long, l As Long, temp As String
l = Len(z)
For i = l To 1 Step -1
temp = temp & Mid(z, i, 1)
Next i
Spiegeln = temp
End Function
Gruß Matthias
 Bild