Clever-Excel-Forum

Hallo VBA-Gemeinde,

ich möchte gerne meinen Text/String formatieren. Schaut euch dazu bitte meinen folgenden Code an.

Code:
Sub Text_Formatieren()

Dim str

str = "Michael"

Debug.Print str & String(20 - Len(str), " ") & "|"

str = "Nena"

Debug.Print str & String(20 - Len(str), " ") & "|"

str = "Joachim Schmidt"

Debug.Print str & String(20 - Len(str), " ") & "|"

str = "Beckenbauer"

Debug.Print str & String(20 - Len(str), " ") & "|"

End Sub

Das "|" - Zeichen steht immer genau an der gleichen Stelle relativ zum Anfang. Meine Preisfrage an euch:
Geht's auch anders/besser? Mit dem Befehl Format bin ich bislang da nicht weitergekommen bzw. habe auch
keine Lust alles auszuprobieren. Danke schon mal für eure Hilfe.

Hallo,

was soll denn das Ziel dieser Aktion sein? Und was das genaue gewünschte Ergebnis?

Hallöchen,

z.B. so, mal nur für den Michael Smile

Sub Format2()
Dim str As String * 20
str = "Michael"
Debug.Print str & "|"
End Sub

Code:
Sub M_snb()

  MsgBox Left("abcde" & Space(20), 20) & "|"

  MsgBox Left("ab" & Space(20), 20) & "|"

  MsgBox Left("abcdefghijklmnop" & Space(20), 20) & "|"

End Sub

Anne, Du hattest schon das Optimum (ich vermute, mit Festbreitenschrift).

Hallo Lupo,

da bin ich nicht von überzeugt Sad

Anne Haubrich

Jonas0806

schauan

snb

lupo1

schauan