Zielwertsuche
24.09.2013 15:04:05
Bilal
Ist diese Code in Ordnung? Aber kommt kein richtiges ergebniss raus. Ist irgendetwas faul...
Sub Schaltfläche5_Klicken()
Sheets("Blatt1").[P37].GoalSeek goal:=Sheets("Blatt1").[AO11], ChangingCell:=Sheets("Blatt1").[ _
_
P32]
Sheets("Blatt1").[Q37].GoalSeek goal:=Sheets("Blatt1").[AP11], ChangingCell:=Sheets("Blatt1").[ _
_
Q32]
Sheets("Blatt1").[R37].GoalSeek goal:=Sheets("Blatt1").[AQ11], ChangingCell:=Sheets("Blatt1").[ _
_
R32]
Sheets("Blatt1").[S37].GoalSeek goal:=Sheets("Blatt1").[AR11], ChangingCell:=Sheets("Blatt1").[ _
_
S32]
Sheets("Blatt1").[U37].GoalSeek goal:=Sheets("Blatt1").[AS11], ChangingCell:=Sheets("Blatt1").[ _
_
U32]
Sheets("Blatt1").[V37].GoalSeek goal:=Sheets("Blatt1").[AT11], ChangingCell:=Sheets("Blatt1").[ _
_
V32]
End
Sub
Vielen Dank