VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Zielwertsuche über VBA

Gruppe

Allgemein

Bereich

Arbeitsblatt

Thema

Zielwertsuche über VBA

Problem

In den Spalten A:D wird über VBA eine Zielwertsuche durchgeführt.

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.




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

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Arbeitsblatt