Hoe werkt deze macro .... ?

[Geschuffelde]

Hallo.

Ik heb dit sheet gekregen welke de breakeven berekend voor een project bij een bepaalde vaste IRR (internal rate of return). Ik wil het gebruiken in mijn eigen bedrijfsplan maar snap niet helemaal wat de Macro doet. Kan iemand het uitleggen:

-------------
Sub calc()
'
' Keyboard Shortcut: Ctrl+m
'
Range("B33").GoalSeek Goal:=0, ChangingCell:=Range("B31")
Range("B16").Select
End Sub

--------------

Met vriendelijke dank.

Michel

 

[Niels28]

In cel B33 staat een formule met een verwijzing naar cel B31.
De uitkomst van cel B33 moet 0 worden door aanpassing van del B31.
de macro past de waarde van B31 dus aan zodat de formule in b33 0 als uitkomst heeft.

graag je vragen op opgelost zetten als je tevreden bent met het antwoord.

Niels