Clever-Excel-Forum

Hallo liebe Excel-Freunde!

Ich hoffe ihr könnt mir bei folgendem Problem weiterhelfen:

Ich habe eine Tabelle mit Tiernummern, jedes Tier besitzt mehrere Kalbedaten (Kalbung 1, 2, 3) angeordnet pro Zeile (siehe Beispieldatensatz, Tabellenblatt 1).
In einer zweiten Tabelle (Tabellenblatt 2 ) habe ich mehrere Diagnosedaten pro Tier, jedoch stehen mehrere Beobachtungen pro Tier in mehreren Zeilen.
Ich möchte herausfinden, ob die jeweilige Diagnose zwischen Kalbung 1 und 2 oder zwischen Kalbung 2 und 3 stattgefunden hat. Ein weiteres Problem ist, das pro Tier in einem Zeitraum (also zB zwischen Kalbung 1 und 2) mehrere Diagnosen auftreten können.

Über Hilfe würde ich mich sehr freuen!

Viele Grüße
Christin

Hallo,

bitte prüfe den Vorschlag genau mit Daten, die der Beispieldatei entsprechen.

Code:
Sub F_en()

Dim RNG As Range

Sheets(2).Activate 'Diagnose

With Sheets(1).UsedRange.Columns(1)

    ls = .Cells(1, Columns.Count).End(xlToLeft).Column

    For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row

        Set RNG = .Find(Cells(i, 1), , xlValues, xlWhole)

        If Not RNG Is Nothing Then

            For j = 2 To ls + 1

                If RNG.Columns(j) > Cells(i, 2) Then

                    Cells(i, 5) = .Cells(1, j - 1)

                    Exit For

                End If

            Next j

            If Cells(i, 5) = "Tier" Then Cells(i, 5) = "vor 1. Kalbung"

        End If

    Next i

End With

End Sub

mfg

Hallo Christin,

anbei ein Vorschlag für eine Formellösung mithilfe der Funktionen INDEX und VERGLEICH

Die Formel in Zelle E2 (Tabelle 2) prüft abhängig von der Tiernummer, zwischen welchen Kalbungen der Diagnosezeitpunkt liegt und gibt einen entsprechenden Text zurück.
(die Formel kann in Spalte E nach unten gezogen werden...),
Die einzelnen Textbausteine habe ich zwecks Flexibilität in eine Hilfstabelle gepackt.

Gruss
Fred

christin

Fennek

Fred11