Danke für deine erneute Rückmeldung.
Leider verstehe ich es nicht ganz.
Also "das Problem ist", dass ich bspw. in Tabelle f3 einen wert von 5 habe und in Tabelle 2 ebenfalls. Dennoch erscheint die Textbox mit dem Hinweis Abweichung.
Wie genau muss ich den Code ändern, damit keine Textbox erscheint, sonder das Makro "einfach zu Ende geht und nichts macht"
If Worksheets("tabelle1").Range("f3").FormulaR1C1 <> "=VLOOKUP(""Beiträge"",Tabelle2!C[-2]:C[-1],2,FALSE))" Then
MsgBox "Abweichung." & vbCrLf & "Anpassung notwendig."
Sorry, falls ich auf dem Schlauch stehe und nochmals Danke für deine Hilfe
|