String zerlegen mit InStr

Forumthread: String zerlegen mit InStr

18.01.2025 12:16:40

Chatzebuseli

Hallo Leute

Ich tue mich gerade wieder etwas schwer...

Thema Strings auseinander puhlen! ICH HASSE ES!!!!!

Ich habe Strings wie solche (z.B 452.85671070 DESCI) ich brauche aber die Zahl und die Buchstaben seperat.
Die Strings sind zwar immer so aufgebaut ( Zahl / Leerzeichen / Bezeichner) aber die Zahl und der Bezeichner unterschiedlich

Mein Plan, das Leerzeichen mit "Instr" suchen und dann die Linke und die Rechte Seite dieser Position auslesen.
Ich kriege es aber nie gebacken die Befehle (Left / Instr/ Right) funktionierend miteinander zu verbinden.

Darum klingt Moment mein Computer eher wie ein Jackpot im Casino! Wer kann mir hier kurz helfen die Syntax zusammen zu basteln?

E liebs Greissli
Chatzebuseli

P.S. .... ja ich werde es mir nun wirklich akribisch genau Notieren.

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: String zerlegen mit InStr

18.01.2025 12:26:58

BoskoBiati2
AW: String zerlegen mit InStr

18.01.2025 12:55:36

Chatzebuseli
AW: String zerlegen mit InStr

18.01.2025 12:51:38

{Boris}
AW: String zerlegen mit InStr

18.01.2025 13:13:49

Chatzebuseli
AW: String zerlegen mit InStr

18.01.2025 12:59:39

GerdL
AW: String zerlegen mit InStr

18.01.2025 14:53:59

Piet
AW: String zerlegen mit InStr

18.01.2025 13:17:46

Chatzebuseli

AW: String zerlegen mit InStr

18.01.2025 12:26:58

BoskoBiati2

Hi,

warum nicht mit Daten--> Text in Spalten, Trennzeichen das Leerzeichen?

Gruß

Edgar

AW: String zerlegen mit InStr

18.01.2025 12:55:36

Chatzebuseli

Ich brauche es als Sytax!

Denn ich lese eine E-Mail die aus der Zwischenablage kopiert ist aus. Dass sind Rohdaten. Welche erst in eine Userform aufgenommen werden. Da durch einen Filter laufen, und dan in die entsperechenden Datenblätter einfliessen.

Jetz hingehen und die einzelnen Struings nochmal in eine Tabelle schreiben, zu Formatieren, wieder Einlesen für die Sortierung/ Filerer ist zu umständlich!

Es geht!
Nur kriege ich gerade die Syntax nicht gebaken!

Hier zerlege ich eine Währungsangabe ( 0.00 CHF)

strBox = TextBox9.Value

strWährung = Right(strBox, 3)

intZ = (Len(strBox) - 4)

douWert = Left(strBox, intZ)

Der Unterschied, hier sind die Zeichen von Rechts her definiert. D.h. immer gleich lang (Zahl/ leerzeichen/ drei mal Buchstabe). Also " Right 3"

Bei dem anderen String ist die Zahl links und die Buchstaben Rechts vom Leerzeichen unbekannt.

Wie also trenne ich dynamisch Links und Rechts vom Leerzeichen.

E liebs Griessli

AW: String zerlegen mit InStr

18.01.2025 12:51:38

{Boris}

Hi,

dafür ist auch die Split-Funktion gut geeignet:

Sub linksrechts()

Const s As String = "452.85671070 DESCI"

MsgBox Split(s, " ")(0) & vbLf & Split(s, " ")(1)

End Sub

VG, Boris

AW: String zerlegen mit InStr

18.01.2025 13:13:49

Chatzebuseli

Hi Boris

Ahhhh ja! Das ist ein Interessanter Hinweis!

So wie ich es mir anschaue, geht es leiglich um den Teil :

Split(s, " ")(0) & vbLf & Split(s, " ")(1)

Danke! Damit kann ich was Anfangen

Der Jackpot gehört nun Dir! ;-)

E liebs Griessli

Chatzebuseli

AW: String zerlegen mit InStr

18.01.2025 12:59:39

GerdL

Moin

Sub Unit()



    Dim x, a, b

    

    Range("a1") = "452.85671070 DESCI"

    

    x = InStr(1, Range("a1"), " ", vbTextCompare)

    a = Left(Range("a1"), InStr(1, Range("a1"), " ", vbTextCompare) - 1)

    b = Right(Range("a1"), Len(Range("a1")) - InStr(1, Range("a1"), " ", vbTextCompare))

    

    

    MsgBox x

    MsgBox a

    MsgBox b

    

    

    a = Split(Range("a1"), " ")(0)

    b = Split(Range("a1"), " ")(1)

    MsgBox a

    MsgBox b



End Sub

Gruß Gerd

AW: String zerlegen mit InStr

18.01.2025 14:53:59

Piet

Hallo

If InStrRev() - bitte nicht vergessen, wertet das -letzte Space- aus, wenn es im Text mehrere Leerzeichen gibt!

mfg Piet

AW: String zerlegen mit InStr

18.01.2025 13:17:46

Chatzebuseli

GerdL
Auch dir herzlichen Dank für deine Mühe.
Noch habe ich mich mit Boris Version befasst. Aber hey danke, deine schaue ich mir naturlich alleine um des Verständniss willen noch mal an.

Aber danke danke danke

E liebs Griessli
Chatzebuseli

Forumthread: String zerlegen mit InStr

7 Beiträge zum Forumthread Beiträge zu diesem Forumthread

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread