Zelle mit Leerstellen füllen



Excel-Version: 8
nach unten

Betrifft: Zelle mit Leerstellen füllen
von: Hans-Jörg
Geschrieben am: 11.04.2002 - 12:58:04

Hallo,
ich habe ein kleines Problem .
Ich befülle eine Variable mit einem Zellwert.
ListStr = TVM.Cells(i, 1)
Wenn der wert nur ein Zeichen beinhaltet soll zusätzlich eine Leerstelle und ein"-" dazu.
Wenn die Zelle 2 Zeichen hat soll nur eine Leerstelle dazu.

z.B.
ListStr = "V" soll dann zu "V -" werden
ListStr = "HQ" soll dann zu "HQ " werden
Wenn ListStr => 3 Zeichen dann OK

Wie kann ich dies abfragen?
Hans-Jörg


nach oben   nach unten

Re: Zelle mit Leerstellen füllen
von: Roli
Geschrieben am: 11.04.2002 - 13:19:23

Hallo Hans-Jörg ,

ich habe dir mal ein Beispiel.Vieleicht kannst Du was gebrauchen.

If Len([a1]) = 1 Then
[a1] = [a1] & " -"
End If

If Len([a1]) = 2 Then
[a1] = [a1] & " "
End If

Gruss Roli


nach oben   nach unten

vielen Dank, damit komme ich weiter
von: Hans-Jörg
Geschrieben am: 11.04.2002 - 13:52:21

.

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Tabelle auf Website"