bedingte Zielwertsuche mit Makro
10.11.2006 11:55:39
Tobias
Ich möchte über Zielwertsuche Werte für die veränderbaren Zellen C7, C8,.... ermitteln, so dass die Zielzellen M7, M8... den Wert Null annehmen. Also habe ich das mit dem Makrorekorder aufgezeichnet:
Range("M7").GoalSeek Goal:=0, ChangingCell:=Range("C7")
Range("M8").GoalSeek Goal:=0, ChangingCell:=Range("C8")
Range("M9").GoalSeek Goal:=0, ChangingCell:=Range("C9")
Soweit funktioniert auch alles einwandfrei. Allerdings ermittelt mir die Zielwertsuche in den veränderbaren Zellen C7, C8, ... teilweise negative Werte. Ich suche nun einen Befehl, der mir in diesem Fall immer automatisch einen positiven Wert in die veränderbare Zelle schreibt (z.B. 0,0000001) falls die Zielwertsuche einen Wert kleiner oder gleich Null ermittelt. Wie müsste ich mein Makro verändern, damit das klappt?
Vielen Dank für die Hilfe.
Gruß
Tobias