Office: Länge einer Zeichenkette

SchmidtMarco · 29. Juni 2005

Hallo zusammen,

wie kann ich in einem Excel-Makro die Länge einer Zeichenkette in einem bestimen Feld ermitteln? Folgende Möglichkeiten habe ich schon (erfolglos) probiert:

Code:

Dim strLaenge as String

strLaenge = cells(1,1)
if strLaenge.Length > 5 then
msgbox ("Die Länge der Zeichenkette beträgt: " & strLaenge)
end if

'ODER:

if cells(1,1).Length > 5 then
msgbox ("Die Länge der Zeichenkette beträgt: " & strLaenge)
end if

'ODER:

cells(1,1).select
if activecell.length > 5 then
msgbox ("Die Länge der Zeichenkette beträgt: " & strLaenge)
end if
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Bitte um Hilfe!

:)

Costi · 30. Juni 2005

Hallo Marco,

versuchs mal mit:
---------------------------------------------------
DIM Laenge as INTEGER

Laenge=len(sheets("Tabelle1").cells(1,1))

if Laenge > 5 then
msgbox ("Die Länge der Zeichenkette beträgt: " & Laenge)
end if
---------------------------------------------------

Schöne Grüße
Costi

SchmidtMarco · 30. Juni 2005

Hallo Costi,

vielen Dank!! Funktioniert SUPER!!!

Office: Länge einer Zeichenkette

Länge einer Zeichenkette

Länge einer Zeichenkette

Länge einer Zeichenkette - Similar Threads - Länge Zeichenkette

VBA in einer Zeile zu lang

Excel: längeren Text auf gesamte verbundene Zellen ausbreiten

Variable Länge

CSV-Import mit seeehr langen Zahlen

Sprungkonstante für 5 kurze, dann 7 lange Monate als Gruppe

Hilfe bei Formel-Vereinfachung/-Kürzung

Formel vereinfachen, aktuelle Formel führt zu extrem langen Ladezeiten bei Excel