Hallo zusammen,
ich versuche mit folgenden Code eine potentielle Abweichung mit Sverweis zu ermitteln, und sofern eine Abweichung vorliegt, soll dich in einer Textbox ausgewiesen werden:
Den Sverweis habe ich aufgezeichnet und eingefügt. Leider funktioniert es nicht. Habt ihr einen Hinweise für mich?
If Worksheets("tabelle1").Range("f3").Value<>(VLOOKUP(""Beiträge"",Tabelle2!C[-2]:C[-1],2,FALSE))" Then
MsgBox "Achtung Differenz." & vbCrLf & "Anpassung notwending."
End If End Sub
Danke vorab und schöne Pfingstage
|