Identifikation einer Zeile anhand Feldinhalt (indirekter Bezug)

[morcint]

Hallo zusammen,

ich stehe vor folgendem Problem:

> In Spalte B stehen in den Zeilen durchnummeriert Zahlen von 1-n (B1= "1.1", B2 = "1.2", B3 = "2.1", ...)
> In Spalte C steht jeweils ein Bezug auf eine Zahl aus Spalte B (z.B. steht in C6 (=B4))
> In Spalte D stehen in einigen Zeilen keine Werte, in anderen Zeilen steht ein Datum (z.B. D4 = (leer), D5 = 03.03.13)

Jetzt möchte ich gerne in Spalte A jeweils für jede Zeile ausgeben, ob in der Zelle in Spalte D und der Zeile, die in C referenziert ist, ein Wert steht oder nicht.
Z.B. Steht in B2 "1.1", in D2 steht "03.03.13", in B3 steht "1.2", in C3 steht (=B2)
--> für A3 wird geprüft, ob die Zelle "D2" leer ist oder nicht, da in C3 ja mit der Referenz auf C2 die Zeile 2 referenziert wird und somit das Feld D2 geprüft werden muss. In dem Beispiel wäre A3 = (WAHR).

Ich hoffe ich konnte mich halbwegs verständlich ausdrücken und würde mich über Hilfe freuen.

Danke und Gruß, morcint

[morcint]

Hallo nochmal,

falls es interessiert: Das Problem ist behoben

Mittels folgendem Makro:

Function CellFormula(Rng As Range) As String
    Dim strResult As String
   
    strCell = Rng.Formula

    For i = 1 To Len(strCell)
        If (Strings.Mid(strCell, i, 1) >= 0 And Strings.Mid(strCell, i, 1) <= 9) Then
            strResult = strResult + Strings.Mid(strCell, i, 1)
        End If
    Next
    CellFormula = strResult
End Function

Und der Funktion (z.B. in Feld A3):

=WENN(C3<>"-";WENN(INDIREKT("D"&TEXT(CellFormula(D3);"#"))<>"";WAHR;FALSCH))

Gruß, morcint

[Officer]

Hallo morcint,

vielen Dank für dein Feedback.

Gruß

Officer