Autor
|
Thema: best. Text/Zahl ausschneiden und einfügen (1115 / mal gelesen)
|
röhmler Mitglied Sachbearbeiter techn. Dokumentation
Beiträge: 414 Registriert: 17.02.2004 AutoCAD Mechanical 2014
|
erstellt am: 09. Mrz. 2016 09:42 <-- editieren / zitieren --> Unities abgeben:
Guten Morgen, ich muß eine Stückliste erstellen mit mehreren Spalten wie Stückzahl, Position, Benennung, Identnummer usw. Mein Problem - die Benennung und die Identnummer stehen in EINER ZELLE. Leider ist unsere Identnummer nicht immer 7-stellig, ältere Identnummern haben nur 4 stellen. Mit der Formel rechts kriege ich die Identnummer schon raus, aber wenns keine 7-stellige Identnummer ist, dann habe ich mehr Text als gewünscht. Gibt es eine Formel/Funktion, die meine Identnummer ausschneidet und in der Spalte daneben einfügt? Folgend ein Beispiel ROUGH ADAPTOR PLATE KSKF-320/3 /1241208 SAFETY PIN D 6X10 120 DEGREES /4462 SCREW PLUG M30 X 1,5 X 12 / 793663 Manchmal ist noch ein leer zwischen der letzten zahl und dem Backslash - das die ganze Sache nicht vereinfacht. Ansonsten könnte man doch "sagen" - schneide mir von rechts alles bis zum Backslah aus und füge es in der Zelle rechts daneben ein. Wer kann mir helfen? VIELEN DANK Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
highway45 Ehrenmitglied V.I.P. h.c. Bastler mit Diplom
Beiträge: 6331 Registriert: 14.12.2004 Office 2007
|
erstellt am: 09. Mrz. 2016 09:52 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
Mit der Standard-Funktion unter "Daten" --> "Text in Spalten" kannst du alles rechts vom Schrägstrich in eine andere Spalte transportieren. Dann kannst du in der neuen Spalte alle Leerstellen durch "Ersetzen" (Strg+H) entfernen. ------------------
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
highway45 Ehrenmitglied V.I.P. h.c. Bastler mit Diplom
Beiträge: 6331 Registriert: 14.12.2004 Office 2007
|
erstellt am: 09. Mrz. 2016 09:52 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
Mit der Standard-Funktion unter "Daten" --> "Text in Spalten" kannst du alles rechts vom Schrägstrich in eine andere Spalte transportieren. Dann kannst du in der neuen Spalte alle Leerstellen durch "Ersetzen" (Strg+H) entfernen. ------------------
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
röhmler Mitglied Sachbearbeiter techn. Dokumentation
Beiträge: 414 Registriert: 17.02.2004 AutoCAD Mechanical 2014
|
erstellt am: 09. Mrz. 2016 10:11 <-- editieren / zitieren --> Unities abgeben:
|
röhmler Mitglied Sachbearbeiter techn. Dokumentation
Beiträge: 414 Registriert: 17.02.2004 AutoCAD Mechanical 2014
|
erstellt am: 09. Mrz. 2016 10:23 <-- editieren / zitieren --> Unities abgeben:
Ähm, wenn ich das machen, dann zerpflückt das "Text in Spalten" meine Benennung (ROUGH ADAPTOR PLATE KSKF-320/3) und dass möchte ich nicht [Diese Nachricht wurde von röhmler am 09. Mrz. 2016 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
highway45 Ehrenmitglied V.I.P. h.c. Bastler mit Diplom
Beiträge: 6331 Registriert: 14.12.2004 Office 2007
|
erstellt am: 09. Mrz. 2016 10:40 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
In der Funktion gibt es mehrere Schritte. Bei Schritt 2 mußt du alle Haken wegnehmen, damit keine Tabs oder Leerstellen gelesen werden. Im Feld "andere" kannst du den Backslash eintragen, damit nur dieser als Trennzeichen genommen wird. ------------------
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
röhmler Mitglied Sachbearbeiter techn. Dokumentation
Beiträge: 414 Registriert: 17.02.2004 AutoCAD Mechanical 2014
|
erstellt am: 09. Mrz. 2016 10:51 <-- editieren / zitieren --> Unities abgeben:
Sorry, hätte ein besseres Beispiel senden sollen. Es gibt mehrere Zellen, wo in der Benennung zwei Backslash sind und danach kommt erst das Backslash vor unserer Identnummer COUNTER NUT KSKF-320/3/2 /857822 danach sollte es so aussehen COUNTER NUT KSKF-320/3/2 (neue Zelle rechts)--> 857822 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
highway45 Ehrenmitglied V.I.P. h.c. Bastler mit Diplom
Beiträge: 6331 Registriert: 14.12.2004 Office 2007
|
erstellt am: 09. Mrz. 2016 11:50 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
Dafür hätte ich auch noch eine Idee ;-) Wenn vor dem letzen Schrägstrich immer zwei Leerstellen sind, aber sonst im Text nicht, dann wandelst du erstmal mit "Ersetzen" Leerstelle+Leerstelle+Schrägstrich um in irgendein Sonderzeichen, zum Beispiel &. Dann sieht dein Text so aus: COUNTER NUT KSKF-320/3/2&857822 Und nun kannst du die Spalten mit dem Trenner & aufteilen. ------------------
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
pablo Mitglied Techniker
Beiträge: 453 Registriert: 23.01.2002
|
erstellt am: 09. Mrz. 2016 19:54 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
|
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
Beiträge: 2624 Registriert: 02.05.2006 Office 2010; Office365 Visual Basic
|
erstellt am: 09. Mrz. 2016 20:42 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
Hallo, Man kann bei finden() auch mehrere Zeichen im Suchtext angeben, damit würde sich aus den angegebenen Texten mit den Formeln =LINKS(A1;FINDEN(" /";A1)) =RECHTS(A1;LÄNGE(A1)-FINDEN(" /";A1)-1) eine Aufteilung ergeben Wird die Identnummer als Zahl benötigt kann dies mit dieser Formel erfolgen: =WERT(RECHTS(A1;LÄNGE(A1)-FINDEN(" /";A1)-1)) Grüße Klaus [Diese Nachricht wurde von KlaK am 09. Mrz. 2016 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
pablo Mitglied Techniker
Beiträge: 453 Registriert: 23.01.2002
|
erstellt am: 09. Mrz. 2016 22:15 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
Zitat: Original erstellt von KlaK: Hallo, Man kann bei finden() auch mehrere Zeichen im Suchtext angeben, damit würde sich aus den angegebenen Texten mit den Formeln =LINKS(A1;FINDEN(" /";A1)) =RECHTS(A1;LÄNGE(A1)-FINDEN(" /";A1)-1) eine Aufteilung ergebenWird die Identnummer als Zahl benötigt kann dies mit dieser Formel erfolgen: =WERT(RECHTS(A1;LÄNGE(A1)-FINDEN(" /";A1)-1))
Klaus, deine Formeln berücksichtigen leider nicht mehrere Schrägstriche im Text. Bei der von mir angegebenen Version wird der Text rechts vom letzten Schrägstrich ohne führende Leerzeichen angegeben. Das ganze stammt (leider) nicht von mir: excelformeln.de und office-loesung.de pablo ------------------ PST => Parametersteuerung für Solid Edge TB Haberl Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
Beiträge: 2624 Registriert: 02.05.2006 Office 2010; Office365 Visual Basic
|
erstellt am: 09. Mrz. 2016 23:57 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
Hallo Pablo, Deshalb habe ich ja auch geschrieben "aus den angegebenen Texten". Dort ist vor der Identnummer immer ein Leerzeichen und ein Schrägstrich Ansonsten habe ich mir meine eigene Suchfunktion gemacht:
Code:
Function FindRev(sSuchtext As String, sText As String) Dim P As Long P = InStrRev(sText, sSuchtext) If P > 0 Then FindRev = P Else FindRev = "#Wert" End If End Function
Diese Funktion entweder in ein Makromodul der aktuellen Arbeitsmappe oder noch besser in eine AddIn-Mappe und man muß nicht mehr lange überlegen ... Aufruf wäre dann: =WERT(RECHTS(A1;LÄNGE(A1)-FindRev("/";A1))) Grüße Klaus [Diese Nachricht wurde von KlaK am 10. Mrz. 2016 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
röhmler Mitglied Sachbearbeiter techn. Dokumentation
Beiträge: 414 Registriert: 17.02.2004 AutoCAD Mechanical 2014
|
erstellt am: 10. Mrz. 2016 08:08 <-- editieren / zitieren --> Unities abgeben:
Guten Morgen Klaus, WELTKLASSE, echt TOP die Formel - funktioniert bestens. VIELEN DANK Eine Frage noch. Die Identnummer wurde so gesehn aus der ZELLE D?? in die ZELL E?? kopiert. Verschieben geht nicht? Denn die Identnummer (samt /) brauche ich in ZELLE D nimmer. Merci Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
Beiträge: 2624 Registriert: 02.05.2006 Office 2010; Office365 Visual Basic
|
erstellt am: 10. Mrz. 2016 08:53 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
Hallo Röhmler, verstehe Deine Frage nicht. Die Formel bezieht sich auf einen Ausgangswert in Zelle A1. Kopiert wird da gar nichts. Wenn Du einen anderen Ausgangswert brauchst mußt Du eben alle A1 durch diesen Zellwert ersetzen. Brauchst Du nun doch den Schrägstrich bei der Identnummer dazu, muß eben der abgefragte Wert vergrößert und das -1 bei der Länge entfernt werden. Aber das war in Deinem Beispiel (neue Zelle rechts) so nicht angegeben (Das Sams würde sagen: Ungenau gewünscht ... ) RECHTS(A1;LÄNGE(A1)-FINDEN(" /";A1)) Grüße Klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
röhmler Mitglied Sachbearbeiter techn. Dokumentation
Beiträge: 414 Registriert: 17.02.2004 AutoCAD Mechanical 2014
|
erstellt am: 10. Mrz. 2016 09:00 <-- editieren / zitieren --> Unities abgeben:
Hallo Klaus, ganz einfach. Wenn ich meine Stückliste (vor dem formatieren) öffne, steht alles in einer Zelle--> D | E SCHALTSCHEIBE 1 OVUSHHHD-130/68/32 / 1216794 | Nach Deiner Formel:--> D | E SCHALTSCHEIBE 1 OVUSHHHD-130/68/32 / 1216794 | 1216794 Spalte D sollte jetzt aber so aussehen --> D | E SCHALTSCHEIBE 1 OVUSHHHD-130/68/32 | 1216794
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
Beiträge: 2624 Registriert: 02.05.2006 Office 2010; Office365 Visual Basic
|
erstellt am: 10. Mrz. 2016 09:06 <-- editieren / zitieren --> Unities abgeben: Nur für röhmler
Hey, Deshalb hatte ich ja ursprünglich beide Formeln angegeben. Dort kann man die Ausgangsspalte A zerlegen nach (z.B. nach Spalte D und E) Anschließend markierst Du die beiden Spalten D und E => kopieren D und E markiert lassen, rechte Maustaste => Inhalte einfügen - Werte Fertig, die Spalte A könnte nun gelöscht werden. Grüße Klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
röhmler Mitglied Sachbearbeiter techn. Dokumentation
Beiträge: 414 Registriert: 17.02.2004 AutoCAD Mechanical 2014
|
erstellt am: 10. Mrz. 2016 09:34 <-- editieren / zitieren --> Unities abgeben:
|