Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1648to1652
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
1648to1652
1648to1652
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Unsichtbare führende Zeichen aus String entfernen

Unsichtbare führende Zeichen aus String entfernen
02.10.2018 11:43:13
Michael
Hallo Zusammen,
ich kopiere eine Textblock aus Outlook in Excel und nehme ihn dann per VBA auseinander.
Doch habe ich "anscheinend" Zeichen am Anfang die sich mit Trim, Glätten o.Ä nicht entfernen lassen. Ich kann auch nicht rausfinden was das für Zeichen sind. Es sieht aus wie 2 Leerzeichen, aber mit TRIM lassen sie sich nicht entfernen :-(
Hat jemand eine Idee dazu?
Ich suche also eine Möglichkeit alles was NICHT ZAHL oder TEXT ist von Links zu löschen.
Gruß
Michael

16
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
=CODE(LINKS(DeineZelle))
02.10.2018 11:48:18
Matthias
Hallo
Lass Dir doch mit der Formel:
=CODE(LINKS(DeineZelle))
das Zeichen zurückgeben, dann hast Du einen Ansatzpunkt.
Gruß Matthias
AW: =CODE(LINKS(DeineZelle))
02.10.2018 12:05:17
Michael
ah,Danke.
okay, das Zeichen ist Code 160, dann folgt Nr. 32
Wie frage ich das ab. Ich weiß nicht wieviele Zeichen vor dem Text sind.
Gruß
Michael
LINKS() ist hier mumpitz...
03.10.2018 00:16:05
Frank
Hallo, CODE() schaut nach dem ersten Zeichen (von Links) deswegen reicht =CODE(deineZelle)
hast Recht :-) owT
03.10.2018 10:19:45
Matthias
SÄUBERN() plus Link
02.10.2018 11:49:32
lupo1
https://support.office.com/de-de/article/s%C3%84ubern-funktion-26f3d7c5-475f-4a9c-90e5-4b8ba987ba41?NS=EXCEL&Version=90&SysLcid=1031&UiLcid=1031&AppVer=ZXL900&HelpId=xlmain11.chm60210&ui=de-DE&rs=de-DE&ad=DE
Anzeige
AW: Unsichtbare führende Zeichen entfernen
02.10.2018 13:12:58
Rudi
Hallo,
DerString=Trim(Replace(DerString,Chr(160),""))
Gruß
Rudi
AW: Unsichtbare führende Zeichen entfernen
02.10.2018 13:35:55
Michael
Danke für den Tipp mit CODE. Jetzt bekomme ich es wohl hin, hoffentlich ist es immer ein Code 160 :-)
Unsichtbare führende Zeichen aus String entfernen
04.10.2018 08:39:33
Michael
Hallo nochmal,
das entfernen von Chr(160) klappt. Aber ich habe am Ende des Textes 5 Leerzeichen, lt. check alles Chr(32), Aber die bekomme ich NICHT weg.
Ich lese den Text in Tabelle 2 in eine Variable BezEN die ich dann mit
Worksheets("Tabelle1").Cells(Tab1Zeile, 2) = Trim(BezEN)
in Tabelle 1 schreibe. Mit dem Trim sollten doch dann alle Leerzeichen weg sein, oder?
Das sind sie aber nicht, wenn ich mir den Text in Tabelle 1 ansehe sind die Leerzeichen immer noch am Ende
Anzeige
Probier mal RTrim ... owT
04.10.2018 08:57:27
Matthias
AW: Probier mal RTrim ... owT
04.10.2018 10:10:12
Michael
Hallo
TRIM habe habe ich auch probiert.
Aber das kommt in Tabelle 1 an.
Erste Zeile der TEXT die 32 dahinter ist die Anzahl der Zeichen = Länge(A1)
Die Zahlen darunter der CHR-Code des Textes. Wie zu sehen sind am Ende 5 Leerzeichen die auch mit
Worksheets("Tabelle1").Cells(Tab1Zeile, 3) = RTrim(BezFra)
NICHT weg gehen. Was ist das für ein MIST :-(
FR METHANOL RECUP DISTILLE       32
70 82 32 77 69 84 72 65 78 79 76 32 82 69 67 85 80 32 68 73 83 84 73 76 76 69 32 32 32 32 32 32
lad doch mal die Datei hoch
04.10.2018 13:39:33
Matthias
Hallo
alles was damit nichts zu tun hat, kannst Du ja löschen.
Gruß Matthias
Anzeige
AW: lad doch mal die Datei hoch
04.10.2018 15:47:39
M
Okay mach ich mal.
In Tabelle 2 stehen die Daten wie ich sie aus Outlook kopiere. Mit dem Button werden sie angepasst und in Tabelle 1 geschrieben und in Zeile 2 kann man bei sehen das hinter beiden Texten noch viele Leerzeichen sind.
https://www.herber.de/bbs/user/124410.xlsm
Gruß
Michael
Das ist aber Zeichen 63 und nicht 32 owT
04.10.2018 16:46:16
Matthias
AW: Probier mal RTrim ... owT
05.10.2018 07:14:12
Michael
Wo ist Zeichen 63? ich sehe nur 32 am ende
AW: Probier mal RTrim ... owT
05.10.2018 08:35:12
Michael
ich habe gefunden :-( ich hatte mir ein VBA-Script geschrieben, das hat mir 32 angezeigt. Wenn ich es direkt in der Tabelle mit Code() mache, bekomme ich 63.
Jetzt habe ich versucht das ganze mit
test = Replace(Cells(ZZeile + 1, 1), Chr(63), "")
weg zu machen, aber ich bin anscheinend zu blöd :-(
Es geht nicht, die Zeichen links bleiben.
Anzeige
hier eine Datei mit dem String und VBA-Code
05.10.2018 09:21:54
Matthias
Hallo
https://www.herber.de/bbs/user/124422.xlsm
Du weißt doch ab welchem Zeichen im String Du die Zeichen ersetzen willst
und die Anzahl der Zeichen kennst Du auch.
Gruß Matthias

42 Forumthreads zu ähnlichen Themen

Leerzeichen links aus TextBox entfernen
Lenni

Moin Excellianer!
Wie kann man in einer TextBox (in einem UserForm) Leerzeichen links des ersten Wortes so rausfiltern, dass der TB-Eintrag wirklich mit einem Zeichen beginnt? ...und keinem Leerzeichen.
Vielen Dank für Eure Hilfe!
Viele Grüße aus dem hohen Norden!
Lenni
19.02.2009 21:58:00
Thread-ID: 1052293
5 Beiträge
Anzeige
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
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
Anzeige
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
letzte Zeichen aus Variable entfernen
Hartmut_M

Hallo,
benötige bitte Hilfe zu folgendem Problem:
Habe in VBA eine Variable.
Aus dieser Variablen möchte ich die letzten 3 Zeichen entfernen.
Bekomme es im Moment nicht hin.
Wie lautet die richtige Anweisung?
Danke für eure Hilfe.
Hartmut
04.04.2012 11:12:13
Thread-ID: 1257818
3 Beiträge
Nur druckbare Zeichen anzeigen lassen
Reinhard

Hallo Wissende,
mit einer Schleife von 0-65535 kann ich mir für jede Schriftart mit ChrW() das jeweilige Zeichen
auflisten lassen.
Viel zu oft zeigt dann Excel bei mir nur ein Quadrat an, also Zeichen nicht darstellbar, quasi
nicht vorhanden in der jeweiligen Schriftart.
Jet...
29.04.2012 00:09:08
Thread-ID: 1261464
13 Beiträge
Zeichen über der Raute aus Tabelle entfernen
ropa

Hallo,
ich habe eine Tabelle in der mehrere Spalten mit Zahlen an der ersten STelle
das Zeichen auf der Rautentaste hat-
Jetzt kann ich mit den Werten nicht rechnen.
Wie kann ich dieses Zeichen entfernen.
Grüße
Roland
13.02.2013 17:28:34
Thread-ID: 1299197
15 Beiträge
Anzeige

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
7
6
1
2
4
3
2
12
14
8
4
5
11
2
1
12
6
2
16
10
2
11
8
3