Excel 2010 - ungleich Bedingung ?

Diskutiere und helfe bei Excel 2010 - ungleich Bedingung ? im Bereich Microsoft Office im Windows Info bei einer Lösung; Hallo zusammen, ich habe z.B. folgende Bezeichnungen: K1287 101K256:1K179 30B19XY2197 oder R 13A 64:1 Das sind Bezeichnungen von Motoren mit... Dieses Thema im Forum "Microsoft Office" wurde erstellt von Macoda, 9. Februar 2017.

  1. Macoda
    Macoda Gast

    Excel 2010 - ungleich Bedingung ?


    Hallo zusammen,


    ich habe z.B. folgende Bezeichnungen:


    K1287 101K256:1K179 30B19XY2197 oder R 13A 64:1


    Das sind Bezeichnungen von Motoren mit Getriebe. In den Bezeichnungen ist die Übersetzung rauszulesen,

    welche vor und nach dem Doppelpunkt zu sehen sind. z.B. 256:1 oder 64:1, kann auch mal ein Komma dabei sein, 64,3:1.

    Wie man sieht, ist entweder ein Leerzeichen davor und/oder danach, oder ein Buchstabe, in diesem Fall ein K (können aber auch andere sein).


    Nun versuche ich verzweifelt diese Getriebeübersetzung in eine eigene Spalte zu filtern und kopieren. Da sie nicht immer an der selben Stelle ist, ist das mit der "Text in Spalten" Funktion nicht machbar.


    Ich habe in verschiedenen Foren auch gelesen das es wohl eine "ungleich Bedingung" gibt. Kann ich mit dieser ungleich Bedingung diese Übersetzung rausfiltern, oder gibt es da einfachere / andere Methoden ?


    Vielen Dank im Voraus


    Macoda
     
  2. Claus Busch Win User

    Excel 2010 - ungleich Bedingung ?

    Hallo,

    dann probiere es so (bei mir funktioniert es damit mit deinen Daten):

    Function Getriebe(myRng As Range) As String
    
    Dim varStr As Variant, varGetr As Variant
    
    Dim i As Integer
    
    Dim str1  As String, str2 As StringvarStr = Split(myRng, " ")
    
    For i = LBound(varStr) To UBound(varStr)
    
        If InStr(varStr(i), ":") Then
    
            varGetr = Split(Application.Trim(varStr(i)), ":")
    
            Exit For
    
        End If
    
    NextIf IsNumeric(Replace(varGetr(0), ",", "")) Then
    
        str1 = varGetr(0)
    
    Else
    
        For i = Len(varGetr(0)) To 1 Step -1
    
            If Asc(Mid(varGetr(0), i, 1)) > 57 Or Asc(Mid(varGetr(0), i, 1)) < 44 Then
    
                str1 = Right(varGetr(0), Len(varGetr(0)) - i)
    
                Exit For
    
            End If
    
        Next
    
    End If
    If IsNumeric(Replace(varGetr(1), ",", "")) Then
    
        str2 = varGetr(1)
    
    Else
    
        For i = 1 To Len(varGetr(1))
    
            If Asc(Mid(varGetr(1), i, 1)) > 57 Or Asc(Mid(varGetr(1), i, 1)) < 44 Then
    
                str2 = Left(varGetr(1), i - 1)
    
                Exit For
    
            End If
    
        Next
    
    End If
    
    Getriebe = str1 & ":" & str2
    
    End Function
    Claus
  3. 13c7c04b-b89f-443f-a Win User

    Excel 2010 - ungleich Bedingung ?

    Hallo,

    ja, der komplette String steht in einem Feld. Aus diesem Feld möchte ich bei vielen Feldern die Übersetzung filtern und in einem separaten Feld eintragen.
  4. 13c7c04b-b89f-443f-a Win User

    Excel 2010 - ungleich Bedingung ?

    Du bist der absolute Hammer, es funktioniert. Ich denke das ich evtl. doch noch einen VBA Kurs machen sollte. Das will ich auch mal können.

    Ich weiss gar nicht wie ich dir danken soll,

    Vielen vielen Dank,

    lieben Gruß,

    Macoda
  5. Claus Busch Win User

    Excel 2010 - ungleich Bedingung ?

    Hallo,

    was davon steht in einer Zelle?

    Ist der komplette String "K1287 101K256:1K179 30B19XY2197" in einer Zelle?

    Claus
  6. 13c7c04b-b89f-443f-a Win User

    Excel 2010 - ungleich Bedingung ?

    Hier ein kleiner Auszug der Ergebnisse:

    [table][tr][td]R IE2-50 13A 50:1[/td][td]50:1[/td][/tr][tr][td]R IE2-400 4757 13A 16:1[/td][td]16:1[/td][/tr][tr][td]R IE2-50 13A 201:1[/td][td]201:1[/td][/tr][tr][td]R IE2-400 4757 13A 64:1[/td][td]64:1[/td][/tr][tr][td]R IE2-400 13AK158:1[/td][td]158:[/td][/tr][tr][td]R IE2-400 13AK1024:1[/td][td]1024:[/td][/tr][tr][td]R19 IE2-400 ZX4126 141 246:1#[/td][td]:[/td][/tr][tr][td]R19 IE2-400 ZY4126 141 246:1#[/td][td]:[/td][/tr][tr][td]R IE2-50 13AK16:1[/td][td]16:[/td][/tr][tr][td]R IE2-400 13A 16:1[/td][td]16:1[/td][/tr][tr][td]R IE2-400 13AK256:1[/td][td]256:[/td][/tr][tr][td]R IE2-400 13A 256:1[/td][td]256:1[/td][/tr][tr][td]R IE2-50 13AK256:1 5545[/td][td]256:[/td][/tr][tr][td]R IE2-400 13A 158:1[/td][td]158:1[/td][/tr][tr][td]54-123 141 14:1 K179 30B18F[/td][td]14:1[/td][/tr][tr][td]R IE2-400 5722 13AK1024:1[/td][td]1024:[/td][/tr][tr][td]141 592:1 2629[/td][td]592:1[/td][/tr][tr][td]141 415:1 2111-2254[/td][td]415:1[/td][/tr][tr][td]R 13A 16:1[/td][td]16:1[/td][/tr][tr][td]R 13A 16:1[/td][td]16:1[/td][/tr][tr][td]R 13A 50:1[/td][td]50:1[/td][/tr][tr][td]R 13A 50:1[/td][td]50:1[/td][/tr][tr][td]R 13AK1024:1[/td][td]1024:[/td][/tr][tr][td]R 13AK64:1[/td][td]64:[/td][/tr][tr][td]R 13AK50:1[/td][td]50:[/td][/tr][tr][td]R 13A 1024:1[/td][td]1024:1[/td][/tr][tr][td]R 13AK50:1[/td][td]50:[/td][/tr][tr][td]R 13AK256:1[/td][td]256:[/td][/tr][tr][td]R 13AK256:1[/td][td]256:[/td][/tr][/table]

    So sieht das bis jetzt aus :)
  7. User Advert


    Hi,

    willkommen im Windows Forum!
Thema:

Excel 2010 - ungleich Bedingung ? - Microsoft Office

Die Seite wird geladen...

Excel 2010 - ungleich Bedingung ? - Similar Threads - Excel 2010 ungleich

Forum Datum

Excel/ Zähler mit Bedingung

Excel/ Zähler mit Bedingung: Hallo!ich habe folgende Aufgabenstellung bei der ich nicht wirklich weiterkomme. Ich habe eine Tabelle mit Datum und Uhrzeit alle 15 min ein Eintrag. Ich brauche nun einen Zähler in einer...
Microsoft Office 27. Januar 2022

Excel Solver Nebenbedingung ungleich null

Excel Solver Nebenbedingung ungleich null: Liebe Community,ich würde gerne den Excel Solver anwenden, bei der meine änderbaren Variablen die einzige Bedingung ungleich null erfüllen müssen. Leider steht diese nicht zur Verfügung. Könnt Ihr...
Microsoft Office 11. November 2021

Excel: Spalte verketten mit Bedingung

Excel: Spalte verketten mit Bedingung: Hallo, Ich suche eine Formel, um bestimmte Inhalte von Zellen, die direkt übereinander stehen, zu verknüpfen, wenn in der einer Zelle der gleichen Zeile ein bestimmter Text steht. Am Ende...
Microsoft Office 1. Mai 2020

[Excel 2016] Datenübertrag - Bedingung.

[Excel 2016] Datenübertrag - Bedingung.: Hallo. Ich bräuchte mal fachmännischen Rat. Ich habe eine Tabelle mit zwei Blättern. Ich vergleiche bspw. Zelle A1 von Blatt 1 mit Spalte A aus Blatt 2. Wenn A1/Blatt 1 in Spalte A/Blatt 2...
Microsoft Office 22. Mai 2019

Excel 2016 Max mit Bedingungen

Excel 2016 Max mit Bedingungen: Hallo zusammen, ich habe ein Problem und in den letzten zwei Stunden alles ausprobiert, aber irgendwie hat leider nichts funktioniert. Ich habe folgende zwei Tabellen: A B D E F G H I J K L 1...
Microsoft Office 16. April 2018

Ungleiche Synchronisierung

Ungleiche Synchronisierung: Hallo! Seit der Umstellung auf die Exchange-Konten habe ich diverse Probleme mit der Synchroniseirung zwischen meinen Geräten. Teilweise sind emails, welche ich auf dem iPad gelöscht habe noch...
Outlook.com 11. März 2017

Excel WENN Formel mit 3 Bedingungen

Excel WENN Formel mit 3 Bedingungen: Hallo ihr Lieben, ich habe eine Excel Tabelle, bei der in Spalte "F" Vornamen von Personen stehen und in Spalte "G" das Geschlecht durch Nummern definiert ist (0=männlich, 1=weiblich und...
Microsoft Office 22. Februar 2017
Excel 2010 - ungleich Bedingung ? solved
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.