ich möchte bei einer Stringvariablen b, in der ich den Tabellennamen speichere, die Zeichen sukzessiv ausgeben.
Wie müßte ich den Code schreiben?
Schöne Grüße
Georg
Sub test()
Dim b As String
Dim i As Integer
b = Worksheets(1).Name
For i = 1 To Len(b)
MsgBox Mid(b, i, 1)
Next i
End Sub