Wenn Fehler, dann Inputbox zum Zellwerte ändern
24.05.2016 13:21:25
Zoe
mein Makro macht ziemlich viel Kopier- und Verschiebearbeit. Ich habe am Anfang eine Überprüfung zweier Zellwerte eingebaut, das wenn diese zwei Werte mit dem Datensatz nicht übereinstimmen, dann geht bei mir eine MsgBox auf und sagt, das die Werte nicht passen, allerdings läuft mein Makro dann weiter mit diesen falschen Werten. Ich hätte gerne das hier statt nur einer MessageBox eine InputBox aufgeht in der ich die zwei Zellwerte ändern kann (und vielleicht gleich nebenher die Überprüfung stattfindet, ob diese Werte jetzt passen, aber das wäre dann eine weitere spielerei) und wenn ich bei dieser Inputbox dann auf ok klicke soll das Makro weiterlaufen.
Geht sowas denn?
So sieht der Code an der Stelle zur Zeit aus:
With ThisWorkbook.Worksheets("Tabelle1")
If (z / .Range("C12").Value) .Range("C13").Value Then
MsgBox "the values of B an IP do not match"
End If
End With
Anzeige