|
Die Excel/VBA-Beispiele (incl. aller Arbeitsmappen: http://www.herber.de/samples/inhalt.html)
Zielwertsuche über VBA
Problem: In den Spalten A:D wird über VBA eine Zielwertsuche durchgeführt. StandardModule: Modul1 Sub SetGoalSeek() Dim iCol As Integer For iCol = 1 To 4 Cells(13, iCol).GoalSeek Goal:=555, ChangingCell:=Cells(1, iCol) Next iCol End Sub |