Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.04.2024 14:45:54
Verknüpfung Tabelleneinträge mit Datumsspalte
27.04.2024 12:08:58
Mittelwertwenn - ich kapiere es nicht :-(
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1528to1532
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
1528to1532
1528to1532
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahl links vom Buchstaben extrahieren

Zahl links vom Buchstaben extrahieren
02.12.2016 09:52:09
PeterO
Hallo,
ich stehe auf dem Schlauch.
Mein Tabellenblatt enthält z.B. folgende Zeichenfolgen:
A1: 2K, 3N, 5X
A2: 2N, 4X, 1K
...
Diese geben mir die Anzahl (Zahl) bestimmter Bauteile (Buchstabe) an, welche ich weiterverabeiten muss. Leider ist die Reihenfolge immer unterschiedlich.
Ich möchte nun per Formel die Zahl vor dem N, dem K und dem X extrahieren und in die Spalten B, C und D eintragen.
Kann mir jemand helfen?
Gruß PeterO

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahl links vom Buchstaben extrahieren
02.12.2016 10:35:21
ChrisL
Hi Peter
Falls die Anzahl Ziffern/Buchstaben immer gleich sind:
=TEIL(A1;1;1)*1
=TEIL(A1;5;1)*1
=TEIL(A1;9;1)*1
cu
Chris
AW: Zahl links vom Buchstaben extrahieren
02.12.2016 10:36:11
Weber
Hallo,
hier ist mal meine Lösung, ob die so optimal ist weiß ich nicht aber sie funktioniert :D
Sub trennen() Dim strteilstring() As String Dim strteil2 Dim strteil3 Dim i Dim row Dim column Dim rng row = 0 Do Until row = 1048576 row = row + 1 rng = Sheets("Tabelle1").Cells(row, 1) If IsEmpty(rng) = True Then GoTo sprung strteilstring = Split(Trim(rng), ",") For i = LBound(strteilstring) To UBound(strteilstring) strteil2 = Right(Trim(strteilstring(i)), 1) strteil3 = Left(Trim(strteilstring(i)), 1) If strteil2 = "N" Then column = 2 ElseIf strteil2 = "K" Then column = 3 ElseIf strteil2 = "X" Then column = 4 End If Sheets("Tabelle1").Cells(row, column) = strteil3 Next i Loop sprung: End Sub mfg
Weber
Anzeige
AW: Zahl links vom Buchstaben extrahieren
02.12.2016 10:43:18
ransi
Hallo Peter,
Meinst du so?
Tabelle1

 ABCDE
1 NXK 
2A1: 2K, 3N, 5X352 
3A2: 2N, 4X, 1K241 
4     

Formeln der Tabelle
ZelleFormel
B2=TEIL($A2;FINDEN(B$1;$A2)-1;1)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
ransi
Anzeige
Das ist der Nachteil der Jeanie (und bspw auch ...
02.12.2016 13:11:52
Luc:-?
…meines Tools), Ransi,
dass TextZahlen auch rechtsbündig dargestellt wdn. Die Fml ist gut, nur fehlt evtl noch ein -- davor.
Ich glaube nicht, Peter,
dass du die Zahlen einfach nur so ungeordnet gebrauchen kannst, wie's grad kommt. Da hat Ransi wohl schon deutlich weiter gedacht als du gefordert hast. Allerdings solltest du dann auch alle Bauteile in einem TabKopf aufführen. Das kann man ggf auch per Fml (mit UDF) tun.
Gruß, Luc :-?
Besser informiert mit …
Anzeige
gut langt nicht - es gibt auch mehrstellige Zahlen
02.12.2016 13:43:36
WF
Hi,
hier: bis 3-stellig
in B2:
=TEIL(" "&WECHSELN($A2;" ";" ");FINDEN(B$1;" "&WECHSELN($A2;" ";" "))-3;3)*1
WF
saublöde Forums-Darstellungs-Macke
02.12.2016 17:07:11
WF
Da werden mehrere Leerzeichen hintereinander gekillt.
Die Formel in B2 lautet:
=TEIL("?"&WECHSELN($A2;"?";"?");FINDEN(B$1;"?"&WECHSELN($A2;"?";"?"))-3;3)*1
in natura sind die Fragezeichen Leerzeichen
WF
Das ist keine 'Forums-Darstellungs-Macke', ...
02.12.2016 18:59:22
Luc:-?
…Walter,
sondern typisch für alle HTML-Browser. Die sind auf Optimal-Darstellung von FließText programmiert! Wenn du das Weglassen von mehrfachen Leerzeichen verhindern willst, musst du die <pre>formatted-Tags benutzen. Das von HWH für Fml-Darstellung vorge­sehene Sonder-Tag-Paar ~f~ kann so etwas nicht verhindern. Anderenfalls muss man echte mit geschützten (&nbsp; → Zeichen160) oder einem anderen Leerzeichen (zB &thinsp;) wechseln, das dann aber beim Fml-Kopieren erhalten bleibt und ggf stören kann.
Gruß & schö2AdWE, Luc :-?
Anzeige
Na, dann geht's auch universeller - mit UDFs, …
02.12.2016 20:07:56
Luc:-?
…Folks:
 ABCDEF
1
OriginalKNXQZY2K, 3N, 5X235  2N, 4X, 1K124  22Q, 7X, 9ZY  7229B1:F1: {=VSplit(VJoin(VSplit(MaskOn(VJoin(A2:A4);"alf"));;-1))}B2[:F4]:=WENNFEHLER(INDEX(VSplit(MaskOn($A2;"num");;1);VERGLEICH(B$1;VSplit(MaskOn($A2;"alf"));0));"")
2
3
4
5
6
Die plurale MatrixFml in Zeile1 kann auch mit ihren kopierten Werten überschrieben und dann alfabetisch sortiert wdn, bevor die andere Fml zum Einsatz kommt. Das könnte dann auch WFs Fml sein, falls die Zahlenwerte 3 Stellen nicht überschreiten (anderenfalls muss angepasst wdn). Meiner etwas längerer Fml sind Stelligkeiten von Text und Zahl egal.
Gruß, Luc :-?
Anzeige

310 Forumthreads zu ähnlichen Themen

Verschiedene Werte in bestimmte Zahlen umwandeln
Henning

Hallo, ich versuche grade bei einem Schichtplan die Verschiedenen Zelleninhalte z.B. Zelle A3 Inhalt "U1",Zelle A4 Inhalt"1/3" usw. in Werte umzuwandeln und diese dann als Stunden ausrechennen zu lassen.
Also so soll z.B. aus dem Inhalt von Zelle A3, dort steht "U1" soll dann 8 Stunden ents...
15.10.2008 18:37:00
Thread-ID: 1016648
4 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
In Zahlen umwandeln
fuxl

Ich hab ein AutoOpen Makro in dem ich die Funktion TextinSpalten verwende um den Zelleninhalt in eine Zahl umzuwandeln und die kleinen Dreiecke los zu werden. Das ganze geschieht mit folgender Zeile:
'Tabelle1.Range("H15:H$" & letzteZeile).TextToColumns Destination:=Tabelle1.Range("H15"...
19.11.2008 11:13:06
Thread-ID: 1025937
5 Beiträge
Anzeige
Zahl einer Zelle in den Wenn-Text
die_nathan

Schönen Nachmittag,
Ist es möglich innerhalb eines Textes die Zahl einer Zelle einzufügen:
falsches Beispiel:
=wenn(A1="Ja!";"Die Gebühr von"A2"Euro ist noch zu zahlen!;"Die Gebühr wurde bereitsbezahlt."
Liebe Grüße
11.12.2008 15:35:07
Thread-ID: 1032078
6 Beiträge
Mit Buchstaben und Wörtern rechnen
via

Hallo da draußen,
ich stehe mal wieder vor einer neuen Herausforderung. Und zwar möchte ich mit Buchstaben bzw. Wörtern rechnen und eine Antwort überprüfen ob sie richtig oder falsch ist.
Als Beispiel:
Elefant < Maus (leichter)
Maus > Hund (schwerer)
Maus < Katze (l...
16.12.2008 18:43:27
Thread-ID: 1033391
10 Beiträge
Zeichenanzahl einer Textbox festlegen
Heinz

Hallo Leute
Habe eine Frage zum setzen einer Zeichenanzahl in einer Textbox.
Ich habe eine UF mit Textboxen, wo max.31 Zeichen enthalten sein dürfen.
Wie kann man diese bitte beschränken ?
Danke
Heinz
25.12.2008 21:05:00
Thread-ID: 1035243
5 Beiträge
der variable einen Wert zuweisen
Frank

Moin moin,
bin ein bisschen aus der Übung..... ;0)
dim Zahl as integer
range("a1").select
ActiveCell.FormulaR1C1 = "=Rand()"
Zahl = Range("A1").Value
anschließend möchte ich mit der Zufallszahl in der Variable Zahl weitermachen.....
Aber in der Variable Zahl bleibt h...
24.02.2009 12:05:15
Thread-ID: 1053441
5 Beiträge
Datum in Textbox in eine Zahl umwandeln
TCO99

Hallo zusammen,
ich habe folgendes Problem.
In einer Spalte einer Tabelle befinden sich Datumsangaben. Ich filtere diese Liste nach einem Datum. Dieses Datum wird vor der Filterung in eine Textbox eingegeben. Als richtiges Datum fuktioniert die Filterung aber nicht mehr. Da habe ich ei...
26.02.2009 23:31:12
Thread-ID: 1054555
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
3
3
1
4
3
5
9
4
4
14
3
11
2
4
12
1
13
2
4
8
5
2
4
3
1