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

Wort in Text suchen und erste Zahl davor ausgeben

Forumthread: Wort in Text suchen und erste Zahl davor ausgeben

Wort in Text suchen und erste Zahl davor ausgeben
07.09.2004 09:19:15
Stefan
Guten Morgen zusammen,
ich habe folgendes Problem:
Ich habe in einer Spalte einen Text, der unterschiedlich lang sein kann. Jedoch kommt immer das Wort "netto" vor. Ich möchte nun die erste Zahl, die im Text vor "netto" steht ausgegeben haben, also z.B.:
xxxxxxxx12xxxxxnettoxxxxxxxxxxxxx
Jetzt sollte die 12 ausgegeben werden.
Wie stelle ich das an?
Danke schon mal,
steve1da
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wort in Text suchen und erste Zahl davor ausgeben
ExceL
hi



was noch nicht geht ist wenn 2 Zahlen im String sind#
Gruß
Christian
AW: Wort in Text suchen und erste Zahl davor ausgeben
07.09.2004 11:32:13
Stefan
Hallo Christian,
genial! Genau das was ich suche. Momentan kommt es auch nicht vor, dass 2 Zahlen im String sind. Wenn doch, meld ich mich nochmal.
Vielen lieben Dank,
steve1da
Anzeige
AW: Wort in Text suchen und erste Zahl davor ausgeben
07.09.2004 11:50:47
Stefan
Hallo Christian,
leider ist es teilweise doch so, dass mehr als 1 Zahl im String ist. Dann klappt Deine Formel zwar auch, er zeigt die richtige Zahl an, jedoch nimmt er in diesen Fällen auch immer 1-3 Buchstaben, die vor der Zahl stehen, mit. Kann dann mit der Zahl natürlich nicht weiterrechnen.
Noch ne Idee?
Steve1da
Anzeige
AW: Wort in Text suchen und erste Zahl davor ausgeben
nighty
hi alle :)
dann vielleicht so :)
10-25 zeichen wird zur zeit eine zahl gesucht,reicht auch prima daumen angaben :)
gruss nighty
Rem =Sumtext(A1:A4;10;25)
einzufuegen unter alt f11(vbeditor)/einfuegen/modul
Function Sumtext(Zellen As Range, AnfangX As Long, EndeX As Long) As Double
Dim Zelle As Range
Dim zahl1
Dim zahl2
Application.Volatile
For Each Zelle In Zellen
If EndeX > Len(Zelle) Then EndeX = Len(Zelle)
If AnfangX For zeich1 = AnfangX To EndeX
If Asc(Mid$(Zelle, zeich1, 1)) > 47 And Asc(Mid$(Zelle, zeich1, 1)) Or Asc(Mid$(Zelle, zeich1, 1)) = 44 Or Asc(Mid$(Zelle, zeich1, 1)) = 46 Then
zahl1 = zahl1 & Mid$(Zelle, zeich1, 1)
End If
Next zeich1
If zahl1 = "" Then zahl1 = "0"
zahl2 = zahl1 * 100
Sumtext = Sumtext + (zahl2 / 100)
zahl1 = ""
zahl2 = ""
Next
End Function
bei nicht haendischer eingabe vielleicht noch dieses zur ergaenzung
einzufuegen unter alt f11(vbeditor)/projektexplorer/DeineTabelle

Private Sub Worksheet_Change(ByVal Target As Range)
Application Calculate
End Sub

Anzeige
AW: Wort in Text suchen und erste Zahl davor ausgeben
ExceL
hi
aber nur mit einer Hilsspalte
:-(
ansonsten wäre natürlich VBA eine lösung


Gruß
Christian
AW: Wort in Text suchen und erste Zahl davor ausgeben
07.09.2004 13:27:24
Stefan
Hallo Christian,
das mit der Hilfsspalte funktioniert auch super.
Habe in der Zwischenzeit Deine erste Formel wie folgt ergänzt:
{=rechts(TEIL(A1;MAX(WENN(ISTZAHL((TEIL(LINKS(A1;FINDEN("netto";A1)-1);ZEILE($1:100);1)*1));ZEILE($1:100);0);A1)-SUMME(ISTZAHL((TEIL(LINKS(A1;FINDEN("netto";A1));ZEILE($1:100);1)*1))*1)+1;SUMME(ISTZAHL((TEIL(LINKS(A1;FINDEN("netto";A1));ZEILE($1:100);1)*1))*1));2}
Dadurch wurden nur die Zahlen angezeigt, die Buchstaben verschwanden.
Trotzdem nochmals 1000 Dank,
steve1da
Anzeige

Forumthreads zu verwandten Themen

Zahlen aus Zelle auslesen
Timo

Hallo liebes Forum,
gibt es eine Möglichkeit aus einer Zelle nur die Zahlen auszulesen, siehe Beispiel:
'123456 BLA --> 123456
Ist eine Excel-interne (keine VBA-Programmierung) hier möglich?
Vielen Dank für die Unterstützung!
Timo
14.08.2008 11:16:00
Thread-ID: 1001770
7 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
Formel, rechts #### bis leer Zeichen
mehmet

Hallo Forum,
in Zelle B2 habe ich z.B. "ABC 314 " stehen.
Nun möchte ich in Zelle D2 folgende String darstellen:
zähle von links vier Strings nach rechts "ABC "
mache aus "314 " nun eine vierstellige Zahl "0314 "
entferne die zwei Leerzeichen nach der Zahl "0314 ", so da...
16.09.2008 10:46:00
Thread-ID: 1009991
8 Beiträge
Alle Leerzeichen bis rechts von Ziffer löschen
Ziffer

Hallo Freaks,
ich habe in der Spalte B 1700 Zeilen, die mit Artikelbezeichnungen folgenden Musters befüllt sind:

Mein Ziel ist es, alle Leerzeichen bis auf zwei nach der letzten Ziffer und dem ersten Buchstaben zu löschen. Also ab der 11 Stelle bis zur 16 Stelle alle Leerzeichen bi...
13.12.2008 21:41:36
Thread-ID: 1032708
3 Beiträge
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
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
Zahl aus best. Zelle auslesen
klaus

Hallo!
Folgende Tabelle soll dargestellt werden:
Tabelle1

 AB1Spalte 1nur 90 (für Anzahl Werte >2 und 210019,12,15,70,70,8,90,9013100160410009,10016,10019,10021,12,16,19,2,24,70,77,8,9,9015 0610009,77,99,88,10019,10021,12,16,19,2,24,70,77,8,9,900

Excel Tabel...
02.03.2009 15:51:14
Thread-ID: 1055623
6 Beiträge
Datum aus Zelle auslesen im Dateinamen übernehmen
Ralf

Hallo Zusammen,
hab' ein kleines Problem:
Wie kann man ein in einer Zelle hinterlegtes Datum im Dateinamen übernehmen.
Gruß Ralf
13.03.2009 16:49:57
Thread-ID: 1059943
4 Beiträge
Anzeige
Daten aus Zelle per CSV nur bedingt auslesen
Heiko

Hallöchen,
ich habe eine Datendatei in CSV mit Simikolon getrennt ohne Umbrüche.
Diese Lade ich auf eine Seite hoch, die mir die jeweiligen Zellen innerhalb einer Datenbank ausfüllt.
Meine Frage wäre jetzt, ob es eine Möglichkeit gibt, durch eingaben innerhalb der CSV-Datei den Text...
13.06.2009 20:14:31
Thread-ID: 1081318
4 Beiträge
Steuerzeichen aus "leeren" ("") Zellen löschen
Christoph

Hallo zusammen,
ich habe ein Tabellenblatt mit jeder Menge (fast) leerer Zellen. Diese werden erzeugt, indem im vorhergehenden Blatt WENN-Funktionen a la
WENN(a1=b1;"x";"")
verwendet werden. Kummer macht mir dies zum Beispiel beim Sortieren und bei Abfragen ob die Zellen leer si...
25.06.2009 10:41:14
Thread-ID: 1084263
5 Beiträge
Macro gesucht Text teilen ab Zeichen "-"
Tom

Liebes Forum,
ich suche ein Macro welches mir alle Zeichen links vom "-" (Minus) in eine neue Spalte B und alle Zeichen rechts vom Minus in die neue Spalte C kopiert. Das "-" (Minus) kann ggf. öfter vor kommen, ich möchte es nur auf das erste von links beziehen.
Konkret
Textxyz 79.x...
06.07.2009 12:18:48
Thread-ID: 1086596
2 Beiträge
Anzeige
Macro gesucht Text teilen ab Zeichen "-"
Tom

Liebes Forum,
ich suche ein Macro welches mir alle Zeichen links vom "-" (Minus) in eine neue Spalte B und alle Zeichen rechts vom Minus in die neue Spalte C kopiert. Das "-" (Minus) kann ggf. öfter vor kommen, ich möchte es nur auf das erste von links beziehen.
Konkret
Textxyz 79.x...
06.07.2009 12:19:17
Thread-ID: 1086598
9 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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