Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1232to1236
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1232to1236
1232to1236
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilenumbrüche und Leerzeichen entfernen

Zeilenumbrüche und Leerzeichen entfernen
Krabbe
Hallo,
ich bin mal wieder am verzweifeln. Wie kann ich die in einer Zelle mit Chr(10) erzeugten Zeilenumbrüche und alle Leerzeichen am Ende des Strings löschen (und zwar nur am Ende).
Zum Verständnis, ich habe in einer UserForm z.B. 15 Textboxen txtMenge1-15 die ich in ein Array schreibe und an eine Zelle übergebe (mit Chr(10) nach jeder Textbox). Die Textboxen sind wenn nichts eingegeben wird mit einem Leerzeichen gefüllt (Das soll auch so bleiben).
Für Hilfe wäre ich dankbar

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zeilenumbrüche und Leerzeichen entfernen
30.09.2011 09:06:57
Rudi
Hallo,
Zelle=RTrim(Replace(Zelle, Chr(10),""))
Gruß
Rudi
AW: Zeilenumbrüche und Leerzeichen entfernen
30.09.2011 09:41:03
matthias.grabs@zeppelin.com
Hallo Rudi,
vielen Dank für die schnelle Antwort, nur leider löscht er mir mit diesem Code alle Zeilenumbrüche, nicht nur die am Ende. Das mit den Leerzeichen klappt aber schon mal.
Grüße Matthias
AW: Zeilenumbrüche und Leerzeichen entfernen
30.09.2011 10:05:37
Rudi
Hallo,
hatte das 'und zwar nur am Ende' auf die LZ bezogen.
Zelle = RTrim(Zelle)
If Right(Zelle, 1) = vbLf Then Zelle = Left(Zelle, Len(Zelle) - 1)
Gruß
Rudi
AW: Zeilenumbrüche und Leerzeichen entfernen
30.09.2011 11:30:47
matthias.grabs@zeppelin.com
Hallo Rudi, ich kriege es nicht hin.
Mit folgendem Code habe ich es probiert. Es kommt aber eine Fehlermeldung "Typen unverträglich"
Habe ich nur in den ersten Textboxen (txtPos1, txtMenge1, txtArtikelnummer1 usw.) etwas eingetragen funktioniert es.
With Sheets("Daten")
For n = 11 To 15
.Cells(erste_freie_Zeile, n) = RTrim(Cells(erste_freie_Zeile, n))
If Right(Cells(erste_freie_Zeile, n), 1) = vbLf Then Cells(erste_freie_Zeile, n) = Left(Cells(erste_freie_Zeile, n), Len(Cells(erste_freie_Zeile, n) - 1))
Next n
End With
Ist wohl nicht mein Tag...
Grüße
Matthias
Anzeige
Da fehlen '.'!
30.09.2011 12:05:38
Rudi
Hallo,

With Sheets("Daten")
For n = 11 To 15
.Cells(erste_freie_Zeile, n) = RTrim(.Cells(erste_freie_Zeile, n))
If Right(.Cells(erste_freie_Zeile, n), 1) = vbLf Then .Cells(erste_freie_Zeile, n) = Left(. _
Cells(erste_freie_Zeile, n), Len(.Cells(erste_freie_Zeile, n) - 1))
Next n
End With

Gruß
Rudi

300 Forumthreads zu ähnlichen Themen

Makro Leerzeichen im markierten bereich entfernen
Christian

Hallo liebe Com.
ich hab mal wieder eine frage.
ich brauch ein makro das in meinen markierten zellen die Leereichen NUR links und rechts entfernt!
mit rtrim ging das irgendwie nicht...!? hoffentlich kann mir jemand helfen...
gruß christian
18.12.2008 14:03:48
Thread-ID: 1033866
5 Beiträge
Anzeige
gewisse sonderzeichen aus zelle entfernen
Tobias

Hallo allerseits,
Ich würde gerne ein gewisses sonderzeichen aus einer zelle entfernen
nämlich dieses: •
If ((cells(i,2) = ?) then ' wenn die zelle dieses zeichen enthält
cells(i,2) = ? ' entfernen
End if
Was muss ich in diesen code einb...
28.02.2009 15:56:56
Thread-ID: 1055091
8 Beiträge
nicht gültige Zeichen aus String filtern
heinzs

Hallo Excelfreunde,
in VBA möchte ich aus einem String nicht erlaubte Zeichen entfernen:
gn_erlaubte_zeichen = "1234567890HIN"
gn_string_original = "abc123HIN"
gn_string_resultat = "123HIN"
Da ich sehr viele Strings zu kontrollieren habe, würde ich ungern mit einer for-Next...
29.12.2010 11:42:18
Thread-ID: 1193168
7 Beiträge
Anzeige
Sonderzeichen aus Spalte entfernen
Peter

Hallo,
ich möchte aus der Spalte B alle Sonderzeichen
wie z.B. _, (,),? usw. entfernen.
Mein Versuch funktioniert leider nicht.
Wer kann helfen?
Siehe Anlage
Danke
Peter
Sub SonderzDel() Dim a As Integer For a = 2 To 5 'Cells(65536, 2).End(xlUp).Row If Cells(a,...
03.03.2011 00:32:51
Thread-ID: 1203960
2 Beiträge
%-Zeichen aus Hyperlink entfernen
Stefan


Hallo zusammen,
ich habe ein Problem mit meiner Tabelle, in denen Fotos zu Namen per Hyperlink hinterlegt sind.
Warum auch immer, stehen auf einmal in allen Hyperlinkadressen '%20' mit drin, also so:
Name,%20Vorname%20200800022991%20opg%202%20.jpg
Richtig heißt die Datei (u...
30.03.2011 20:26:02
Thread-ID: 1208245
3 Beiträge
Per VBA , in . ändern in ersten 7-String-Zeichen
TommiH

Moin,
gibt es eine einfache Möglichkeit (einfacher als per left/mid/instr. oder split) um in den ersten 7 Zeichen einer Zelle die Kommas in Punkte zu ändern? Und das per VBA-Code?
Tommi
04.07.2011 15:34:05
Thread-ID: 1220870
3 Beiträge
chinesiches zeichen per VBA aus Text entfernen
Franz

Hallo Kollegen,
kann mit jemand sagen ob es möglich ist per VBA aus mehreren Zellen bestimmte Zeichen zu löschen.
Beispiel:
ich habe artikelbeschreibungen die wie folgt aussehen
右阀座C12045.6.1.25
压力表安装板BCW46D.6.10-4
管夹体SP322-PP DP-AS
测压管HFJ2-P3-3-P-800...
09.09.2011 07:55:42
Thread-ID: 1229171
5 Beiträge
Bereich markieren u. Zeichen daraus entfernen
Wolfgang

Guten Abend, liebe Excel-Gemeinde !
Irgendwie stehe ich auf dem Schlauch. Hoffentlich kann mir jemand helfen...
Ich bekomme aus unterschiedlichen Quellen Materialnummern im Excelformat
für die Erstellung von Versandaufträgen zugeschickt.
Mal haut der Absender Leerzeichen dazwis...
26.09.2011 19:42:13
Thread-ID: 1231545
4 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
4
7
6
2
1
2
2
4
3
2
14
8
28
6
4
5
11
56
2
1
12
6
2
2