Es kann also das gleiche Modell mit gleicher Arbeitsbreite in mehreren Revisionen geben. Ich möchte, dass die höchste Revision markiert wird. Zum Beispiel durch eine andere Farbe in der Zelle.
Ich habe aber überhaupt keinen Ansatz, wie ich das machen könnte.
Daher würde ich mich hier über jede Hilfe sehr freuen!
07.07.2023, 15:53 (Dieser Beitrag wurde zuletzt bearbeitet: 07.07.2023, 15:57 von HKindler.)
Hi,
ich würde Modellreihe/Breite und Revision in zwei getrennte Spalten schreiben. Modellreihe: =TEXTVERKETTEN(" ";WAHR;ÜBERNEHMEN(TEXTTEILEN(A1;" ");;2)) Revision: =WENNFEHLER(--SPALTENWAHL(TEXTTEILEN(A1;" ");3);"") Die Revision wird damit direkt als Zahl abgetrennt.
Jetzt kannst du deine bed.Form mit folgender Formel erstellen: =ZelleMitRevision=MAXWENNS(SpalteMitReision;SpalteMitModellreihe;ZelleMitModellreihe)
Gruß, Helmut
Win10 - Office365 / MacOS - Office365
Folgende(r) 1 Nutzer sagt Danke an HKindler für diesen Beitrag:1 Nutzer sagt Danke an HKindler für diesen Beitrag 28 • Dressler
vielen Dank für die gute und einfache Lösung. Ich habe das in einer Reihe allerdings nur dann hinbekommen, wenn ich die Regel auf jede einzelne Zelle kopiere. Das hat mit Variablen über die Spalte nicht funktioniert.
10.07.2023, 12:56 (Dieser Beitrag wurde zuletzt bearbeitet: 10.07.2023, 13:02 von HKindler.)
Hi,
wie ich es mir gedacht hatte: Falsch gesetzte Dollarzeichen. Die Formel muss lauten
=$C4=MAXWENNS($C:$C;$B:$B;$B4)
Beachte das fehlende $-Zeichen jeweils vor der Zeilennummer.
Und wenn leere Zellen nicht gefärbt werden sollen, dann machst du eine weitere Prüfung, z.B. dass die Revision >0 sein muss (leere Wellen werden als 0 gewertet).
=($C4>0)*($C4=MAXWENNS($C:$C;$B:$B;$B4)) oder auch (da jede Zahl <>0 als WAHR angesehen wird) =$C4*($C4=MAXWENNS($C:$C;$B:$B;$B4))
Gruß, Helmut
Win10 - Office365 / MacOS - Office365
Folgende(r) 1 Nutzer sagt Danke an HKindler für diesen Beitrag:1 Nutzer sagt Danke an HKindler für diesen Beitrag 28 • Dressler
aus einer Sache bin ich in beiden Foren bisher nicht schlau geworden. Bitte erkläre es uns noch mal.
Es gibt offenbar einen Höchstwert in MU-L = MU-L 220 03 l 00016850-16 Das ist Eindeutig! Was ist bitte mit anderen Modellreihen, z.B. MU-Pro = MU-Pro 250 01 l 00040441-07 Soll die nicht markiert werden? Und geht es dabei immer um die höchste Revision, unabhängig von der Arbeitsbreite??
10.07.2023, 13:05 (Dieser Beitrag wurde zuletzt bearbeitet: 10.07.2023, 13:06 von HKindler.)
Hi,
also meine Formeln ignorieren alles ab dem 3. Leerzeichen (also ab " | 00...") und werten die komplette Zahl direkt davor aus. Natürlich wird die Breite und die Modellreihe berücksichtigt.
Sub T_1() Dim DD: Set DD = CreateObject("Scripting.Dictionary") Dim Ar, Tx As String, Ta As String
For i = 3 To Cells(Rows.Count, 1).End(xlUp).Row If Len(Cells(i, 1)) > 8 Then Tx = Replace(Cells(i, 1), Chr(108), "|") Ar = Split(Tx, "|") Ta = Replace(Ar(0), " ", Chr(160), , 1) DD(Split(Ta)(0)) = Split(Ta)(1) 'Debug.Print i, Trim(Ar(0)), Split(Ta)(0), Split(Ta)(1)
End If Next i
i = 0 For Each k In DD.keys i = i + 1 Cells(i, 4) = k Cells(i, 5) = DD(k) Next k
End Sub
Die grün markierten Zeilen konnte ich nicht nachvollziehen. Mein Ergebnis: