folgendes VBA-Schnipsel funktioniert einwandfrei
ActiveCell.FormulaR1C1 = _
"=LOOKUP(2,1/(Bew!R1C2:R500C2&Bew!R1C3:R500C3=R4C33&RC8),Bew!R1C3:R500C3 & "" "" &Bew!R1C4:R500C4)"
so schaut die Formel dann im Blatt aus:
=VERWEIS(2;1/(Bew!$B$1:$B$500&Bew!$C$1:$C$500=$AG$4&$H15);Bew!$C$1:$C$500 & " " &Bew!$D$1:$D$500)
Mein Problem: ich brauche das Ergebnis als MessageBox
folgendes hat nicht funktioniert (Fehler 2015 - #WERT)
dim a
a = Evaluate("=LOOKUP(2,1/(Bew!R1C2:R500C2&Bew!R1C3:R500C3=R4C33&RC8),Bew!R1C3:R500C3 & "" "" &Bew!R1C4:R500C4)")
msgbox a
Was mache ich falsch? Wer hat den richtigen Tipp?
Liebe Grüße Petra