Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 16:33:24
Worksheets variable
18.04.2024 15:53:31
In Outlook (Exchange) Serientermin erstellen
18.04.2024 15:16:20
VBA Suchen, Kopieren, Einfügen
18.04.2024 15:16:07
Verschieben von Daten um bestimmte Zeilen nach unten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1392to1396
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
1392to1396
1392to1396
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

8 stelligen Zahlenblock in Textfeld finden

8 stelligen Zahlenblock in Textfeld finden
19.11.2014 19:53:11
Claus
Hallo Excelspezialisten,
sorry, ich will euch nicht verkohlen. Ich sehe fast genau mein Problem hier, und das ist wirklich totaler Zufall. Nur komme ich nicht ganz klar damit... Deshalb frage ich jetzt doch mit meinem vorbereiteten Text:
Gibt es eine Formel, die innerhalb einer Zelle, z. B. A10, den ersten Block mit 8 aufeinanderfolgenden Ziffern findet und diese ausgibt?
Oder geht das nur als Makro?
Bsp.:
Hans 12345678hugo gibt aus: 12345678
123456780123 hugo gibt aus: 12345678
Hans 1234567hugo gibt aus: leer oder Fehler
Hänsle123456780123 hugo gibt aus: 12345678
Vielen Dank und liebe Grüße, Claus

18
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
MatrixFormeln! ...
19.11.2014 20:44:32
Matthias
Hallo
 ABC
2Stringmit Fehlerohne Fehler
3Hans 12345678hugo gibt aus1234567812345678
4123456780123 hugo gibt aus1234567812345678
5Hans 1234567hugo gibt aus#WERT! 
6Hänsle123456780123 hugo gibt aus1234567812345678
7Matthias 6598736598 L6598736565987365

Formeln der Tabelle
ZelleFormel
B3{=ABS(LINKS(WECHSELN(A3;LINKS(A3;VERGLEICH(WAHR;ISTZAHL(TEIL(A3;SPALTE(1:1);1)*1);0)-1);"");8))}
C3{=WENNFEHLER(ABS(LINKS(WECHSELN(A3;LINKS(A3;VERGLEICH(WAHR;ISTZAHL(TEIL(A3;SPALTE(1:1);1)*1);0)-1);"");8));"")}
B4{=ABS(LINKS(WECHSELN(A4;LINKS(A4;VERGLEICH(WAHR;ISTZAHL(TEIL(A4;SPALTE(2:2);1)*1);0)-1);"");8))}
C4{=WENNFEHLER(ABS(LINKS(WECHSELN(A4;LINKS(A4;VERGLEICH(WAHR;ISTZAHL(TEIL(A4;SPALTE(2:2);1)*1);0)-1);"");8));"")}
B5{=ABS(LINKS(WECHSELN(A5;LINKS(A5;VERGLEICH(WAHR;ISTZAHL(TEIL(A5;SPALTE(3:3);1)*1);0)-1);"");8))}
C5{=WENNFEHLER(ABS(LINKS(WECHSELN(A5;LINKS(A5;VERGLEICH(WAHR;ISTZAHL(TEIL(A5;SPALTE(3:3);1)*1);0)-1);"");8));"")}
B6{=ABS(LINKS(WECHSELN(A6;LINKS(A6;VERGLEICH(WAHR;ISTZAHL(TEIL(A6;SPALTE(4:4);1)*1);0)-1);"");8))}
C6{=WENNFEHLER(ABS(LINKS(WECHSELN(A6;LINKS(A6;VERGLEICH(WAHR;ISTZAHL(TEIL(A6;SPALTE(4:4);1)*1);0)-1);"");8));"")}
B7{=ABS(LINKS(WECHSELN(A7;LINKS(A7;VERGLEICH(WAHR;ISTZAHL(TEIL(A7;SPALTE(5:5);1)*1);0)-1);"");8))}
C7{=WENNFEHLER(ABS(LINKS(WECHSELN(A7;LINKS(A7;VERGLEICH(WAHR;ISTZAHL(TEIL(A7;SPALTE(5:5);1)*1);0)-1);"");8));"")}
Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Gruß Matthias

Anzeige
AW: MatrixFormeln! ...
19.11.2014 21:09:43
Claus
Hallo Matthias,
wow! Mit den von mir gegebenen Beispielen klappt das super (perfekt auch der Hinweis wie man Matrixformel eingibt) Dankeschön.
Das einzige Problem: Mein Hirn. Ich stelle nämlich fest, dass ich jede Menge Fälle habe, wo vor dem 8-stelligen Ziffernblock auch noch Ziffern stehen, eben weniger als 8. Und bei denen soll die Formel den ersten (am weitesten links stehenden) mindestens 8-stelligen Block ausgeben. Sorry.
Bsp.:
A2 electronic housing 343394550
soll 34339455 ausgeben. (die 9. Stelle ist manchmal eine Null, manchmal fehlt sie, deshalb gehe ich auf 8 Stellen und hänge dann noch eine Null an, das sollte ich aber selber hinbekommen... ;-)
Ich fürchte, dass das jetzt komplett anders geht, sorry, wäre aber spitze wenn du mir nochmals weiterhelfen könntest. Danke schon mal.
Claus

Anzeige
AW: MatrixFormeln! ...
19.11.2014 21:23:08
Matthias
Hallo
Was klappt da nicht mit:
electronic housing 343394550
 ABC
2electronic housing 3433945503433945534339455

Formeln der Tabelle
ZelleFormel
B2{=ABS(LINKS(WECHSELN(A2;LINKS(A2;VERGLEICH(WAHR;ISTZAHL(TEIL(A2;SPALTE($1:$1);1)*1);0)-1);"");8))}
C2{=WENNFEHLER(ABS(LINKS(WECHSELN(A2;LINKS(A2;VERGLEICH(WAHR;ISTZAHL(TEIL(A2;SPALTE($1:$1);1)*1);0)-1);"");8));"")}
Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Gruß Matthias

Anzeige
AW: MatrixFormeln! ...
19.11.2014 21:45:58
Claus
die Ziffer davor, das A2
A1 pc board FR4, 1 ,5mm, Cu 70pm/70pm 343081370
Also ich muss nicht nach der ersten Ziffer suchen und dann nach dem 8-stelligen Block, sondern egal wie viele Ziffern davor stehen... dann den 8-stelligen Block

Boris bitte ... wenn Du Zeit hast
19.11.2014 21:53:23
Matthias
Hallo
Boris ist im Forum anwesend.
Der kann das alles schneller und besser.
Ich hoffe er schaut mal hier rein
Das A2 hatte ich als Zelladresse interpretiert.
Ich versuch nochmal was, hoffe aber das Boris reinschaut.
Gruß Matthias

AW: Boris bitte ... wenn Du Zeit hast
19.11.2014 22:04:04
{Boris}
Hi zusammen,
ggfls. so:
{=--TEIL(A1;MIN(WENN(ISTZAHL(TEIL(A1;SPALTE(1:1);8)*1)*(TEIL(A1;SPALTE(1:1);1)" ");SPALTE(1:1)));8) }
VG, Boris

Anzeige
Danke Boris ...
19.11.2014 22:13:33
Matthias
Hallo
Nun nur noch der WennFehler drum und alles ist gut
 AB
2StringDanke Boris
3Hans 12345678hugo gibt aus12345678
4123456780123 hugo gibt aus12345678
5Hans 1234567hugo gibt aus 
6Hänsle123456780123 hugo gibt aus12345678
7Matthias 6598736598 L65987365
8A1 pc board FR4, 1 ,5mm, Cu 70pm/70pm 34308137034308137

Formeln der Tabelle
ZelleFormel
B3{=WENNFEHLER(--TEIL(A3;MIN(WENN(ISTZAHL(TEIL(A3;SPALTE($1:$1);8)*1)*(TEIL(A3;SPALTE($1:$1);1)<>" ");SPALTE($1:$1)));8);"")}
B4{=WENNFEHLER(--TEIL(A4;MIN(WENN(ISTZAHL(TEIL(A4;SPALTE($1:$1);8)*1)*(TEIL(A4;SPALTE($1:$1);1)<>" ");SPALTE($1:$1)));8);"")}
B5{=WENNFEHLER(--TEIL(A5;MIN(WENN(ISTZAHL(TEIL(A5;SPALTE($1:$1);8)*1)*(TEIL(A5;SPALTE($1:$1);1)<>" ");SPALTE($1:$1)));8);"")}
B6{=WENNFEHLER(--TEIL(A6;MIN(WENN(ISTZAHL(TEIL(A6;SPALTE($1:$1);8)*1)*(TEIL(A6;SPALTE($1:$1);1)<>" ");SPALTE($1:$1)));8);"")}
B7{=WENNFEHLER(--TEIL(A7;MIN(WENN(ISTZAHL(TEIL(A7;SPALTE($1:$1);8)*1)*(TEIL(A7;SPALTE($1:$1);1)<>" ");SPALTE($1:$1)));8);"")}
B8{=WENNFEHLER(--TEIL(A8;MIN(WENN(ISTZAHL(TEIL(A8;SPALTE($1:$1);8)*1)*(TEIL(A8;SPALTE($1:$1);1)<>" ");SPALTE($1:$1)));8);"")}
Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Danke Boris

Anzeige
Alles gut :-)) VG, Boris
19.11.2014 22:23:40
{Boris}
....

AW: Alles gut :-)) VG, Boris
20.11.2014 10:13:16
Claus
Hallo Boris, hallo Matthias,
sorry, hatte gestern Abend keine Zeit mehr, deshalb erst jetzt meine Reaktion. Diese ist: Supererfreut und begeistert! Klappt jetzt prima. Supervielen Dank an euch zwei!
Eine Kleinigkeit, die aber NICHT ausgemerzt werden muss weil es nicht stört:
Seltsam, "A3 resin thixotropic RAKU-PUR 21-2113-1/23 Rampf" führt zu "77800". Evtl. werden also noch Minus und Schrägstrich als Rechenzeichen interpretiert?
Wenn dahinter aber wieder eine Sachnummer (mein Blocks sind Sachnummern mit denen ich per Copy & paste weiterarbeite) kommt, passt es nämlich trotzdem, z. B. "U-PUR 21-2113-1 31510333 test" gibt die gewünschte 31510333 aus.
Liebe Grüße
Claus, der Begeisterte

Anzeige
77800
20.11.2014 11:28:34
Rudi
Hallo,
der Teilstring 2113-1/2 wird durch die Multiplikation zum 2.1.2113, was der Zahl 77800 entspricht.
Gruß
Rudi

Danke Rudi :-)
20.11.2014 12:50:17
Matthias
Hallo
Dann benutze Wechseln() zusätzlich.
Dort änderst Du das Minus-Zeichen in Raute
 AB
9A3 resin thixotropic RAKU-PUR 21-2113-1/23 Rampf 
10A3 resin thixotropic RAKU-PUR 21-2113-1 31510333 test31510333

Formeln der Tabelle
ZelleFormel
B9{=WENNFEHLER(--TEIL(WECHSELN(A9;"-";"#");MIN(WENN(ISTZAHL(TEIL(WECHSELN(A9;"-";"#");SPALTE($1:$1);8)*1)*(TEIL(WECHSELN(A9;"-";"#");SPALTE($1:$1);1)<>" ");SPALTE($1:$1)));8);"")}
B10{=WENNFEHLER(--TEIL(WECHSELN(A10;"-";"#");MIN(WENN(ISTZAHL(TEIL(WECHSELN(A10;"-";"#");SPALTE($1:$1);8)*1)*(TEIL(WECHSELN(A10;"-";"#");SPALTE($1:$1);1)<>" ");SPALTE($1:$1)));8);"")}
Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Evtl kann man auch noch den Slash "/" gegen Raute tauschen.
Danke Rudi
Gruß Matthias

Anzeige
Ja, was soll denn beim 1.Wert rauskommen, ...
20.11.2014 13:06:31
Luc:-?
…Claus,
ein Fehlerwert bzw nichts? Und dass das Gewünschte beim 2.Wert rauskommt, glaube ich auch nicht, denn hier treten ebenfalls die von Rudi erwähnten Effekte auf, weshalb ich da -131510 erhalte.
Wenn du dagg meine UDF-haltige Fml aus dem von dir erwähnten BT entsprd anpasst, kommt tatsächlich die von dir gewünschte Zahl heraus, weil MaskOn alle Nicht-Ziffern entfernt. Außerdem liefert sie bei nicht passenden Ausgangswerten den sinnvollen Fehler #NV (und ist außerdem noch etwas kürzer):
{=--INDEX(TEIL(Splint(MaskOn(A1; "num"));1;8);VERGLEICH(8;LÄNGE(TEIL(Splint(MaskOn(A1; "num"));1;8)); 0)) }
Gruß, Luc :-?

Anzeige
AW: Ja, was soll denn beim 1.Wert rauskommen, ...
20.11.2014 13:19:32
Claus
Da ich ja deutlich schrub, "Eine Kleinigkeit, die aber NICHT ausgemerzt werden muss weil es nicht stört" denke ich, dass ihr grade in der sportlichen Wettkampfphase seid?
Also, das mit dem Datum ist ja der Hammer! Da zieh ich mal den nicht vorhandenen Hut, Rudi.
Sodele, die Formel mit wechseln hab ich jetzt eingebaut - das funktioniert.
Luc:-? , bei deiner Formel erhalte ich "#NAME?" - wahrscheinlich ist da Excel nicht komplett installiert oder so? Aber bitte sei mir nicht böse, da wird mir jetzt der Aufwand zu groß - weil die andere Formel ja für das was ich brauche funktioniert und ich die auch schon recht kurz finde.
Nochmals herzlichen Dank an euch Excel-Perfektionierer (und das ist wirklich als dickes Lob gemeint)
Claus

Anzeige
Nee, Claus, Xl ist schon komplett, nur hast du ...
20.11.2014 14:54:09
Luc:-?
…nicht beachtet, was in dem verlinkten Thread steht! In der dortigen Fml sind die UDFs unterstrichen, also auch Links (halt mal den Mauszeiger drauf!). Aber du kannst dich auch gern mit den paar mickrigen Textauswertungsfktt in Xl bescheiden… ;->
Luc :-?

AW: Nee, Claus, Xl ist schon komplett, nur hast du ...
20.11.2014 15:13:51
Claus
Hallo Luc:-?,
oha, da bin ich fast überfordert. UDFs sind user defined formulas? Also müsste ich mir die quasi holen, denke ich.
Falls du nichts dagegen hast würde ich mich dann doch lieber "auch gern mit den paar mickrigen Textauswertungsfktt in Xl bescheiden… ;-"... (Textauswertungsfunktionen in Excel... richtig entkürzt?)
offtopic:
Sehe ich es richtig, dass ihr euch hier gerne mal mit Verbesserungen eigentlich bereits funktionierender Lösungen überbietet und euch gegenseitig, natürlich im Sinne von "was sich liebt das neckt sich", mit entsprechenden Sticheleien aufzieht? Find ich klasse. Das Forum hier ist echt spitze und ich würde ja auch gerne mal jemandem helfen, bei entsprechend einfachen Fragen kann ich das auch. Es ist mir aber sehr selten gelungen weil dann meist jemand von den Spezialisten schon schneller war.
Grüßle Claus

Noch eine AW, ...
20.11.2014 18:41:04
Luc:-?
…Claus;
1. UDF ist die gängige Abk(ürzung) für user-defined function, also benutzer­definierte Funktion (→ Abk Fkt, plur Fktt), nicht Formel.
2. „Absolution“ war bereits vorweg erteilt worden und die Abk wurde von dir richtig interpretiert (s.a.u. 1)… ;-]
3. Es ist lt Regularium weder unerwünscht noch verboten (wie in manchem anderen Forum), aber das sind in diesem Fall auch 2 Paar Schuhe — die immer komplizierter gewordene reine Standard­Fml­Lösung (Abk Fml →Formel) steht hier einer unveränderten, relativ einfachen und leicht durchschaubaren Fml­Lösung mit UDF-Einsatz ggüber, die nicht jeder anwenden kann bzw will. Dann muss derjenige uU aber auch häufiger mit Anpassungsarbeiten rechnen, falls plötzlich auch Texte auftreten, die zuvor nicht berücksichtigt wurden, wie du hier ja auch eindrucksvoll demonstriert hast (ein Bsp dafür ist jetzt ebenfalls im oben verlinkten Thread zu finden!). ;-]
Luc :-?

AW: Noch eine AW, ... und noch ein Dank
21.11.2014 10:57:47
Claus
Hallo Luc:-?,
ja, da bin ich vollkommen bei dir. Es ist sicher kein Nachteil, wenn man verschiedene Ansätze erhält und dann entscheiden kann, was im anstehenden Fall geeigneter erscheint. Das zeichnet dieses Forum auch irgendwie aus. Wobei ich kein anderes Excel Forum kenne, weil ich dieses als Erstes kennen lernte und mir hier ja stets geholfen wird, also kein Bedarf für was Anderes.
Also nochmals vielen Dank an alle Beteiligten, diese Lösung ist implementiert und wird schätzungsweise etwa ein / zwei mal monatlich meine Arbeit erleichtern. Super.
Liebe Grüße Claus

330 Forumthreads zu ähnlichen Themen

Hintergrundfarbe in Zahl umwandeln
Timo

Hallo zusammen.
Gibt es über VBA eine Möglichkeit, die Hintergrundfarbe einer Zelle in eine Zahl umzuwandeln und das schneller als mit for- Schleifen?
Habe einen Bereich ("J16:AG39"), wo ich per Zellaktivierung mit der Maus Zellen oder auch Zellbereiche mit einer Hintergrundfarbe verseh...
07.08.2008 19:30:00
Thread-ID: 1000082
4 Beiträge
Anzeige
Zahl vorn/hinten vom Text trennen + Komma
StefanK

Hallo Excel-Freunde
ich möchte gern per Formel folgendes lösen:
in zelle a3 steht
1 haley, bill rock around the clock 1956
jetzt soll in b3 die "1" stehen --- löse ich per Formel mit =LINKS(A3;SUCHEN(" ";A3)-1)
in e3 soll "1956" stehen --- löse ich mit Array-Formel {=...
25.09.2008 19:00:21
Thread-ID: 1012407
12 Beiträge
Textbox Ausgabe als Zahl bzw. Zeit formatieren
Steffan

Hallo ihr lieben,
ich schreib jetzt schon den ganzen Tag an folgender Routine:
Private Sub CommandButton1_Click() Dim z As Integer z = Range("I101").End(xlUp).Row + 1 TextBox1 = Format(CDate(TextBox1.Value), "dd.mm.yyyy") Cells(z, 9) = TextBox1 'Datum des Tauchgangs Cells(z, 12) = Tex...
28.09.2008 20:12:56
Thread-ID: 1012988
6 Beiträge
Anzeige
Zahlen rechtsbündig in einer Textbox
Helmut

Hallo,
ich habe einen Textstring mit Zahlen die ich rechstbündig anordnnen will.
Text= "Beisiel: " & Format (Zahl,"#,###")
Wie wird die Zahl im Formatbefehl z.B rechtsbündig bei max 6 Stellen ausgegeben?
Gruß
Helmut
04.11.2008 11:57:00
Thread-ID: 1021556
2 Beiträge
Zahl eingeben und per VBA formatieren
Herbert

Hallo Gemeinde
Ich habe eine Zelle in einem .xlt, dort soll der User eine Zahl eingeben und mit dem Changeereignis
soll die Zahl in der Form JJ/###A umgewandelt werden.
Beispiel: 201 soll 08/201A werden. Das, was ich hier verbrochen habe, funst nicht, kann mir jemand helfen?
P...
05.11.2008 16:08:10
Thread-ID: 1021969
12 Beiträge
Textzahl umwandeln
Stephan

Hallo zusammen,
ich habe folgendes Problem:
Mit dem u. a. Code werden Zeilen aus einer Datei in eine andere kopiert. Die Spalte B (B2:B65535) der Zieldatei ("Auswertung.xls)" soll nun aber zusätzlich noch mit 1 multipliziert werden, da diese ein Datum als Textzahl enthält und dieses in...
10.11.2008 11:12:00
Thread-ID: 1023147
22 Beiträge
Nur Zahlen in sehr vielen Textboxen
uli

Hallo,
habe ein im Internet gefunden, der allerdings noch ein bisschen angepasst werden muss. Vielleicht könnt ihr mir helfen, da ich an dieser Stelle nicht mehr weiterkomme.
Ich möchte die Eingabe von Buchstaben in mehreren Textboxen verbieten. Dies mache ich mit folgendem Code in eine...
13.11.2008 10:24:00
Thread-ID: 1024091
3 Beiträge
TextBox Inhalte sollen Zahlen sein
Frank

Hallo Zusammen!!!
Mit folgendem Code:
Private Sub CommandButton2_Click() If Me.TextBox1.Value = "" Then MsgBox "Sie müssen ein Datum eingeben" Exit Sub End If If Me.TextBox2.Value = "" Then MsgBox "Sie müssen eine Anfangszeit eingeben " Exit Sub End If If Me.TextBox3.Value = "" Then M...
17.11.2008 21:37:00
Thread-ID: 1025414
8 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
3
5
11
5
3
1
11
21
2
7
4
3
3
2
1
8
5
4
21
3
5
2
2
6
4