Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

doelzoeken automatisch laten verlopen ?

1,015 views
Skip to first unread message

jO

unread,
Mar 18, 2008, 9:49:04 AM3/18/08
to
Beste,


Ik heb een werkblad waar ik om het uur ander cijfermateriaal binnen
krijg,
daar dien ik dan een waarde van te berekenen met doelzoeken.
Dit doe ik nu manueel dit neemt ongeveer een 3/4 uur in beslag.

Ik heb geprobeert dit te automatiseren door het op te nemen van een
macro,
maar daar ging het fout ik moet namelijk manueel invullen " Op waarde
" bij doelzoeken,
ik had graag met een celverwijzing het aangegeven maar dit is niet
mogelijk bij doelzoeken.


Weet iemand hiervoor een oplossing?

dank bij voorbaat,

Jo

jan

unread,
Mar 18, 2008, 10:46:54 AM3/18/08
to
Jo,

Bedoel je zoiets:

Range("B1").GoalSeek Goal:=Range("G1"), ChangingCell:=Range("D1")


Op waarde wordt dan gezet op de waarde die in G1 staat:

B1 wordt getracht gelijk te maken aan G1 door D1 te wijzigen


Jan

edjez

unread,
Mar 18, 2008, 11:02:03 AM3/18/08
to
Volgens mij moet het wel kunnen. Als je de macro opneemt met de handmatig
ingegeven cellen/waarde en daarna kijkt hoe de macro in VBA eruit ziet (met
ALT-F11, krijg je een resultaat als dit (met je eigen cellen en waarden
natuurlijk):

Range("G4").GoalSeek Goal:=900, ChangingCell:=Range("G3")

Hierin kun je natuurlijk de verwijzingen opnemen die je wilt.

Gr. Ed

raulr...@gmail.com

unread,
Mar 23, 2016, 12:53:00 PM3/23/16
to
Op dinsdag 18 maart 2008 14:49:04 UTC+1 schreef jO:
Excel gebruiken?
0 new messages