Textbezeichnungen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

Sub LeerzeichenWeg() 'entfernnt alle Leerzeichen aus dem 'Inhalt der ausgewählten Zellen '!!!!!!Bereich vorher markieren!!!!!! Dim rng As Range For Each rng In Selection rng = Replace(rng, " ", "") Next End Sub

Hi Vorname,
dass das, was du möchtest, genau so realisierbar ist, glaube ich nicht.
Weder in einer Formel noch in VBA ist allgemein einscheidbar, ob ein Leerzeichen eingestreut werden soll oder nicht.
Fraglich sind in der Beispielmappe die Leerzeichen zwischen den Spalten D und F in folgenden Zeilen:
Zeile 2: Schraubenverdi /// chter - da gehörte sicher kein Leerzeichen hin
Zeile 4: 362 /// 503 - da möchtest du wohl ein Leerzeichen haben
Zeile 7: 07.0 /// 8 - da soll sicher wieder kein Leerzeichen rein.
Wie sollte eine Formel (oder auch ein VBA-Programm) das unterscheiden?
Häufiger dürfte es sein, dass kein Leerzeichen eingefügt werden soll.
Hier meine Formelvorschläge:

	F	G	H	I	J	K	L	M	N
1	ARTBEZEICHNUNG3		kein Leerzeichen zwischen D und F	Len	Tr	möglichst langer Teil 1	Len		Len
2	chter 362 101 05	17	Bitzer Filter Löt f. OS/HS Schraubenverdichter 362 101 05	57	27	Bitzer Filter Löt f. OS/HS	26	Schraubenverdichter 362 101 05	30

Formeln der Tabelle

Zelle	Formel
G2	=LÄNGE(F2)
H2	=GLÄTTEN(B2)&" "&GLÄTTEN(D2)&GLÄTTEN(F2)
I2	=LÄNGE(H2)
J2	{=MAX(WENN(TEIL(LINKS(H2;40); ZEILE($1:$49); 1)=" ";ZEILE($1:$49)))}
K2	=LINKS(H2;J2-1)
L2	=LÄNGE(K2)
M2	=RECHTS(H2;I2-J2)
N2	=LÄNGE(M2)

Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!

Matrix verstehen

	F	G	H	I	J	K	L	M	N
10			Leerzeichen zwischen D und F			möglichst langer Teil 1
11	chter 362 101 05	17	Bitzer Filter Löt f. OS/HS Schraubenverdi chter 362 101 05	58	27	Bitzer Filter Löt f. OS/HS	26	Schraubenverdi chter 362 101 05	31

Formeln der Tabelle

Zelle	Formel
G11	=LÄNGE(F11)
H11	=GLÄTTEN(B11)&" "&GLÄTTEN(D11)&" "&GLÄTTEN(F11)
I11	=LÄNGE(H11)
J11	{=MAX(WENN(TEIL(LINKS(H11;40); ZEILE($1:$49); 1)=" ";ZEILE($1:$49)))}
K11	=LINKS(H11;J11-1)
L11	=LÄNGE(K11)
M11	=RECHTS(H11;I11-J11)
N11	=LÄNGE(M11)

Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!

Matrix verstehen

	F	G	H	I	J	K	L	M	N
19			kein Leerzeichen zwischen D und F					möglichst langer Teil 2
20	chter 362 101 05	17	Bitzer Filter Löt f. OS/HS Schraubenverdichter 362 101 05	57	1	Bitzer Filter Löt	18	f. OS/HS Schraubenverdichter 362 101 05	39

Formeln der Tabelle

Zelle	Formel
G20	=LÄNGE(F20)
H20	=GLÄTTEN(B20)&" "&GLÄTTEN(D20)&GLÄTTEN(F20)
I20	=LÄNGE(H20)
J20	{=MIN(WENN(TEIL(RECHTS(H20;40); ZEILE($1:$49); 1)=" ";ZEILE($1:$49)))}
K20	=LINKS(H20;I20-40+J20)
L20	=LÄNGE(K20)
M20	=RECHTS(H20;40-J20-0)
N20	=LÄNGE(M20)

Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!

Matrix verstehen

Und hier die BeiSpielMappe: https://www.herber.de/bbs/user/77648.xls
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Beliebteste Forumthreads (12 Monate)

	H	I
2	Bitzer Filter Löt f.	OS/HS Schraubenverdichter 362 101 05

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread