Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zielwertsuche

Zielwertsuche
20.05.2008 14:09:59
J.
Hallo Freunde,
ich brauch ein Makro das in einer Schleife die Zielwertsuche auslöst.
Zielzelle ist " I6 "
Zielwert ist " 0 "
Veränderbare Zelle ist " J6 ".
Das Ganze soll nun so laufen das es immer eine Zeile nachunten springt solange bis es zum letzten Eintrag gelangt ist.
Kann die Tabelle leider von hier nicht hochladen, schade;-)
Danke im voraus
Jochen

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zielwertsuche
20.05.2008 14:49:00
Daniel
Hi
so vielleicht

Sub Makro3()
Dim Zelle As Range
Set Zelle = Range("I6")
Do Until Zelle.Formula = ""
Range("I6").GoalSeek Goal:=0, ChangingCell:=Range("J6")
Set Zelle = Zelle.Offset(1, 0)
Loop
End Sub


aber es macht definiv keinen Sinn, die Zielwertsuche mehrfach über die gleiche Zelle laufen zu lassen.
1x ist völlig ausreichend, dazu braucht du keine Schleife
Gruß, Daniel

Anzeige
AW: Zielwertsuche
20.05.2008 15:00:00
J.
hay Daniel,
hatte mich vieleich mißverstänlich ausgedrückt, meinte es so:
Zielzelle ist " I6 "; Zielwert ist " 0 "; Veränderbare Zelle ist " J6 ";
Zielzelle ist " I7 "; Zielwert ist " 0 "; Veränderbare Zelle ist " J7 ";
Zielzelle ist " I8 "; Zielwert ist " 0 "; Veränderbare Zelle ist " J8 ";
usw bis Ende der Tabelle bzw. Einträge.
Danke
Jochen

Anzeige
AW: Zielwertsuche
20.05.2008 15:46:14
Daniel
Hi
dann in der Schleife anstelle von "Range("I6") "Zelle" verwenden und anstelle von "Range("J6")" "Zelle.Offset(0,1)"
Gruß, Daniel

AW: Zielwertsuche
20.05.2008 16:22:31
J.
Hay Daniel,
bitte gib mir noch einmal das komplette Makro, habe es versucht aber meine VBA - Kenntnisse sind nicht so berauschend.
Danke für Deine Bemühungen.
Gruß
Jochen

Anzeige
AW: Zielwertsuche
20.05.2008 17:16:46
Daniel
HI
diese Zeile:

Range("I6").GoalSeek Goal:=0, ChangingCell:=Range("J6")


so umschreiben


Zelle.GoalSeek Goal:=0, ChangingCell:=Zelle.Offset(0,1)


kann eigentlich nicht so schwer sein.
Gruß, Daniel

Anzeige
AW: Zielwertsuche
21.05.2008 14:10:30
J.
Hi,
danke für den Tipp.
Funktioniert wunderbar.
War auf dem falschen Weg;-)
Gruß
Jochen
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige