Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1600to1604
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
1600to1604
1600to1604
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalte Stringreihe finden

Spalte Stringreihe finden
21.01.2018 17:41:01
mehmet
Hallo Forum,
komme leider mit Musterlösung
https://www.herber.de/forum/archiv/1560to1564/1561485_VBA_Zahl_amp_Buchstabenkombination_finden.html
nicht weiter
Es soll in Spalte F6:F nach folgende String gesucht werden:
Buchstabe R gefolgt von einem Zahl [0-9] bis Leerzeichen kommt
Bsp Spalte F:
R26L/19//95 R26R/19//95 NOSIG
R25/610195 TEMPO 28030G50KT BKN008
R01L/510175 R01R/510182 R08/510175 TEMPO BKN008
Wenn gefunden, dann
1. Fund von R[0-9] bis Leerzeichen in Spalte I eintragen
2. Fund von R[0-9] bis Leerzeichen in Spalte Q eintragen
3. Fund von R[0-9] bis Leerzeichen in Spalte Y eintragen
4. Fund von R[0-9] bis Leerzeichen in Spalte AG eintragen
5. Fund von R[0-9] bis Leerzeichen in Spalte AO eintragen
6. Fund von R[0-9] bis Leerzeichen in Spalte AW eintragen
Beispiel Datei:

Die Datei https://www.herber.de/bbs/user/119148.xlsm wurde aus Datenschutzgründen gelöscht

Vielen Dank und Gruss
mehmet

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

Betreff
Datum
Anwender
Anzeige
AW: Spalte Stringreihe finden
22.01.2018 11:19:42
mehmet
Hallo,
habe mal diese Formel versucht ohne Erfolg:
Inhalt Zelle f19 " R26L/19//95 R26R/19//95 NOSIG"
Formel in Zelle i19=VERGLEICH("*"&"R"&ISTZAHL(F19)&"*";F19;0)
Fehlermeldung #NV
Gruss
mehmet
Re Stringreihe finden
22.01.2018 16:08:51
Josef
Hallo
Du kannst davon ausgehen, dass noch keiner dein Problem richtig verstanden hat.
Was heisst denn: Buchstabe R gefolgt von einem Zahl [0-9] bis Leerzeichen kommt

mach doch einmal ein Beispiel für R[0-9] bis Leerzeichen
Gruss Sepp
AW: Re Stringreihe finden
22.01.2018 19:27:24
mehmet
Hallo Sepp,
vielen Dank fuer deine Hilfe
Sorry, dass ich nicht ganze nicht verstaendlich beschreiben konnte
Schleifen Abfrage soll sein F6 bis F.. (kein eintrag)
Gesucht soll in Zelle nach Buchstabe R mit einem Zahl dahinter
Wenn gefunden, 1. Fundstelle in Nachbarspalte rechts I eintragen
Falls es eine zweite Fundstelle gibt, soll diese in Spalte Q eingetragen warden
Eine dritte Fundstelle in Spalte Y und vierte Fundstelle in Spalte AG,
fuenfte in Spalte AO und sechste in Spalte AW.
hier ein Beispiel:
In Zelle F19 steht " R26L/19//95 R26R/19//95 NOSIG"
In Zelle I19 soll stehen "R26L/19//95" (hier erste Fundstelle)
und in Zelle Q19 soll stehen "R26R/19//95" (hier zweite Fundstelle)
oder anders:
In Zelle F42 steht " R01L/510175 R01R/510182 R08/510175 TEMPO BKN008"
In Zelle I42 soll stehen "R01L/510175" (hier 1. Fundstelle)
In Zelle Q42 soll stehen "R01R/510182" (hier 2. Fundstelle)
In Zelle Y42 soll stehen "R08/510175" (hier 3. Fundstelle)
Habe mal die Datei mit Loesung (in gruen) hoch geldaen:
https://www.herber.de/bbs/user/119169.xlsm
Vielen Dank fuer deine Muehe
Gruss
mehmet
Anzeige
AW: Re Stringreihe finden
23.01.2018 10:25:17
ChrisL
Hi
Sub t()
Dim lngZeile As Long, arrSplit As Variant, intFund As Integer, intSplit As Integer
For lngZeile = 6 To Cells(Rows.Count, 6).End(xlUp).Row
intFund = 0
arrSplit = Split(Cells(lngZeile, 6), " ")
For intSplit = LBound(arrSplit) To UBound(arrSplit)
If Left(arrSplit(intSplit), 1) = "R" And InStr(1, arrSplit(intSplit), "/") And _
IsNumeric(Replace(Replace(Right(arrSplit(intSplit), Len(arrSplit(intSplit)) - _
InStr(1, arrSplit(intSplit), "/")), "/", ""), "R", "")) Then
intFund = intFund + 1
Cells(lngZeile, 1 + intFund * 8) = arrSplit(intSplit)
End If
Next intSplit
Next lngZeile
End Sub
cu
Chris
Anzeige
AW: Re Stringreihe finden
23.01.2018 12:10:06
mehmet
Hallo Chris,
dein Macro funktioniert wie es sein soll
vielen herzlichen Dank
einfach wunderbar
Gruesse
mehmet
AW: Stringreihe finden
23.01.2018 10:33:51
Josef
Hallo
In I6 folgende Formel:
=WENNFEHLER(GLÄTTEN(LINKS(WECHSELN(TEIL($F19;AGGREGAT(15;6;ZEILE(A$1:A$99)/(TEIL($F19;ZEILE(A$1:A$99) ;1)="R")^TEIL($F19;ZEILE(A$2:A$100);1);LINKS(I$2));99);" ";WIEDERHOLEN(" ";99);1);99));"")
I6 anschliessend kopieren und in Q6, Y6 …. einfügen.
Die Formeln anschliessend nach unten kopieren.
Gruss Sepp
AW: Stringreihe finden
23.01.2018 12:12:30
mehmet
Hallo Sepp,
ich hätte nicht gedacht, dass es auch mit Formel geht
Hab es getestet und es funktioniert hervorragend.
Vielen Dank dafür und deine Hilfe
Grüsse
mehmet
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzahl unterschiedl. Werte in Spalte zählen
Jakob

Hallo,
ein ähnliches Problem wurde hier im Forum schon einmal diskutiert. (https://www.herber.de/forum/archiv/632to636/t635773.htm)
Meine Problem:
Wie kann ich die Anzahl unterschiedlicher Einträge/Werte einer Spalte erhalten, ohne dass diese vorgegeben werden ( also ohne die Verwe...
14.08.2008 18:16:11
Thread-ID: 1001934
2 Beiträge
Anzeige
In Spalte nach Anzahl eines Begriffs suchen?
Lauren

Hall Leute!
ich will nach einem Begriff, in meinem Fall nach "SUMs" in der Spalte C suchen und wissen wie oft es in der Spalte vorkommt.
Bei Berechnungen funktioniert es mit ZÄHLENWENN ohne Probleme aber wie erhalte ich die "absolute" Zahl?
Vielen Dank für Eure Hilfe!
Grüße
...
19.08.2008 11:08:23
Thread-ID: 1002846
5 Beiträge
Letzter Wert einer Spalte (Matrixformel)
{mskro}

Hallo Excelaner,
ich benötige mal wieder eine Hilfestellung.
Es soll der Wert in einer Spalte angezeigt werde, der in der untersten Zeile steht.
Mittels der Recherche habe ich nun folgende MatrixFormel erstellt:
=INDEX(Z1:Z5000;MAX(WENN(Z1:Z5000"";ZEILE(1:5000)));1)
Nur wird...
28.08.2008 09:59:21
Thread-ID: 1005303
9 Beiträge
Anzeige
Zelleninhalt (Text) in 2 Spalten teilen
El.

Hallo!
Habe eine Spalte in der Artikelname und Artikelmerkmale, durch drei Punkte getrennt "...", zusammen stehen. Beispiel: Lecker Whisky 21 Jahre ... Lieferung in hochwertiger Schatulle
Wie krieg ich nun den Text links der Punkte in eine extra Spalte und rechts der Punkte in eine extr...
03.09.2008 16:35:00
Thread-ID: 1007155
4 Beiträge
von Datum bis Datum suchen und Werte in die Spalte
Datum

Hallo liebe Excel-Könner,
ich habe folgendes Problem und finde keine Lösung.
Ich habe in Spalte A von 2006 bis heute Datum stehen, über eine UserForm möche ich in zwei TextBoxen von bis Datum eintragen und in Spalte B in diesem Bereich den WertX.
Ich hoffe Ihr könnt mir helfen!
...
07.09.2008 09:31:20
Thread-ID: 1007931
8 Beiträge
Spalte nach Schlüsselwörtern auswerten
Mumber

Hallo Experten,
brauche dringend Eure Unterstützung.
Ich würde gerne im Rahmen einer Auswertung eine bestimmte Spalte (Text) mittels VBA nach bestimmten Schlüsselwörtern durchsuchen lassen und bei Treffer eine dem Schlüsselwort entsprechende Kategoriebezeichnung in anderer Spalte (glei...
08.09.2008 11:31:00
Thread-ID: 1008091
5 Beiträge
Spaltentrennzeichen nach speichern in Text-Datei
Michael

Hallo
ich habe ein Problem. Vielleicht ist es schwierig, vielleicht aber auch nicht.
Ich habe eine Text-Datei mit Spaltentrennzeichen "|" (besser als ";" der Übersichtlichtlichkeit halber) und verschiedenen Längen der Spalten.
Ich will diese in Excel überarbeiten und als Text-Dat...
11.09.2008 09:28:00
Thread-ID: 1008978
3 Beiträge
Text in anderer Datei suchen, kopiertes rechts ein
Rudolf

Hallo an alle, bin neu hier und benötige Hilfe.
Wie kann ich in Spalte A einen Text z.B. K1 (Kommt immer nur 1x vor) suchen.
Das aus anderer Datei kopierte dann rechts in Sp. C gleiche Zeile einfügen,
so das Range("C45").Select wegfallen kann.
Ich hätte dann die Möglichkeit bel...
12.09.2008 15:29:00
Thread-ID: 1009393
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
1
5
4
8
4
3
7
4
2
14
4
2
2
20
7
4
4
2
6
4
6
6
12
11
3