Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1028to1032
1028to1032
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Teile eines Strings auslesen

Forumthread: Teile eines Strings auslesen

Teile eines Strings auslesen
05.12.2008 10:10:18
Joachim
Hi,
wie kann ich denn einen Teil eines Strings auf dem Sheet "data" in der Zelle B10 auslesen. und zwar folgender massen:
Die Einträge könnten so aussehen:
GBm123456
ATU12478
GM123587
Dabei interessieren mich aber nur die Buchstaben, ABER der wahrscheinlich Hauptproblem: es sollen nur die GROSSBUCHSTASBEn ausgelesen werden. Also beim ersten Beispiel soll nur "GB" ausgelesen werden, das kleine "m" soll dabei nicht berücksichtigt werden, beim zweiten Beispiel "ATU" und beim dritten "GM"
Der Buchstabenteil hat immer entweder 2 oder 3 Stellen
Diese drei Varianten gibt es. Kann man beim auslesen unterscheiden zwischen Gruss und kleinschrift ?
Danke.
Joachim
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Teile eines Strings auslesen
05.12.2008 10:32:53
Ingo
Hallo Joachim,

Sub großbuchstaben()
Dim i As Integer
Dim str As String
Dim rng As Range
Set rng = Sheets("data").Range("B10")
str = ""
For i = 1 To Len(rng)
If Asc(Mid(rng, i, 1)) >= 65 _
And Asc(Mid(rng, i, 1))


mfG
Ingo Christiansen

Anzeige
Danke , Funktioniert oT
05.12.2008 12:47:13
Joachim
AW: Teile eines Strings auslesen
05.12.2008 10:37:00
Beate
Hallo Joachim,
 AB
1GBm123456GB
2ATU12478ATU
3GM123587GM

Formeln der Tabelle
ZelleFormel
B1=LINKS(A1;2)&WENN(UND(CODE(TEIL(A1;3;1))>=65;CODE(TEIL(A1;3;1))<=90); TEIL(A1;3;1); "")

Gruß,
Beate
Anzeige
etwas einfacher mit multiplizieren
05.12.2008 12:47:13
WF
Moin Beate,
=LINKS(A1;2+(CODE(TEIL(A1;3;1))>64)*(CODE(TEIL(A1;3;1))<91))
Salut WF
Danke oT
05.12.2008 12:48:03
Joachim

Forumthreads zu verwandten Themen

ersten Blank finden
Franz
Hallo Fachleute,
ich denke, mein Problem ist nicht allzu schwierig, aber ich komm nicht drauf. Ich möchte per VBA in einem String (in dem Fall einem Dateinamen) den ersten Blank finden. Die Anzahl der Zeichen bis zu diesem Blank ist variabel, sonst könnte ich z. B. mit "Left(...." suchen. Nach d...
30.09.2022 00:21:23
Thread-ID: 1901181
6 Beiträge
Anzeige
Teilstring als value aus Spalte auslesen
Constantin

Hallo,
wie lässt sich mit VBA in einer Schleife eine Spalte (z.B. 10) durchlaufen, bei der bei jeder Zelle die letzen fünf Zeichen (eines strings) extrahiert und die selbe Zelle mit dem Value dieser fünf "Zeichen" ersetzt wird?
Über einen Tip würde ich mich freuen.
Constantin
...
19.09.2012 17:38:45
Thread-ID: 1279228
2 Beiträge
Zeichen auslesen
Georg

Liebe Mitglieder,
in einer Spalte stehen immer Werte die unterschiedlich reinkommen:
Kst 00247 München
Kst 00247 - München
Kst 00247
Diese Spalte würde ich gern konsolidieren:
Es soll übrig bleiben, um bei dem Beispiel zu bleiben (egal wie es reinkommt):
247 München<...
19.07.2018 16:57:36
Thread-ID: 1634921
15 Beiträge
Anzeige
Mehrere zeichen aus Zeichenkette löschen
via

Hallo,
ich habe eine Spalte mit mehreren Wörtern, die entweder mal einen "." oder auch mal ein "," oder ":" i.d.R. am Ende stehen haben. Diese Zeichen möchte ich mit einer Formel löschen. NICHT mit Suchen und Ersetzten.
Beispiel - Ausgangsdaten
---------------------------------
...
09.12.2008 20:48:50
Thread-ID: 1031506
6 Beiträge
Nur 50 Zeichen eines Strings auslesen
Kai

Hi,
ich habe in A1 einen String stehen, den möchte ich auslesen und weiter verwerten. Wenn der String aber über 50 Zeiche hat, sollen nur die ersten 50 Zeichen ausgelesen werden, der Rest kann ignoriert werden.
String = Sheets("Daten").Range("A1")
Wie lesen ich diese aus ?
Dank...
20.05.2009 10:15:40
Thread-ID: 1076201
14 Beiträge
Anzeige
Zeichenfolge in einem String färben
Mandy

Hi,
ich habe eine Spalte mit viele Zellen und Text. Nun möchte ich innerhalb der Spalte alle Zellen durchlaufen und alle Zeichenfolgen "###" rot färben.
Wie kann ich denn das mit einem Makro machen.
Danke
Mandy
15.09.2009 11:59:36
Thread-ID: 1102845
12 Beiträge
Leerzeichen innerhalb eines Strings finden
pitmu1@web.de

Hallo zusammen,
wer kann mir sagen, wie man das 2. Leerzeichen von rechts innerhalb eines Strings finden kann.
Möglicherweise ohne VBA.
Danke im voraus
17.09.2009 11:40:42
Thread-ID: 1103455
2 Beiträge
Userform soll Teil eines Strings in Spalte suchen
Jaffi

Hallo liebe Mitstreiter,
nun habe ich mal wieder ein Problem welches ich nicht alleine lösen kann :(
Ich möchte mithilfe einer UserFom und einer For-Schleife 3 Buchstaben bzw, Zahlen oder beides in einer Spalte suchen. Ich gebe also 3 Zeichen in die Textbox ein und die Prozedur soll nun...
11.11.2009 09:39:13
Thread-ID: 1116052
13 Beiträge
Text ab einer bestimmten Stelle löschen +Hyperlink
Werner

Hallo,
ich habe in Excel in einer Spalte (Spalte D) unter einander sehr viele Zeilen nach folgenden Schema
(Hinweis: Ich habe das h am Anfang hier weggelassen, weil der Beitrag sonst immer als Hyperlink dargestellt wird, in meiner Tabelle ist es vorhanden):
ttp://www.ihrname.de*dfg...
06.12.2009 00:35:56
Thread-ID: 1122006
2 Beiträge
Wie lösche ich ein Zeichen in einem String?
hans-Jörg

Hallo,
strTest = "A "
wie kann ich das leerzeichen löschen?
Oder besser:
If Mid(TBTeilStr,2,1) = " " Then ??????Wie geht es wenn ich die letzten 2 Zeichen löschen möchte?
Hans-Jörg
11.04.2002 16:55:49
Thread-ID: 112482
3 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum