Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<
Microsoft Office 2003-2019 => Excel => Thema gestartet von: morcint am März 07, 2013, 10:29:22 Vormittag
-
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
-
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
-
Hallo morcint,
vielen Dank für dein Feedback.
Gruß
Officer