oplosser activeren via makro

[Harry Veen]

Ik heb op mijn werkblad een knop geplaatst. Hieraan wil ik een macro koppelen. Ik voer de volgende handelingen uit.

stap 1. Ik start de macrorecorder
stap 2. Ik klik met mijn linkermuisknop op menu "extra"
stap 3. Ik selecteer " Oplosser"
stap 4. Ik definieer mijn Parameters Oplosser
stap 5. Ik druk op de knop "oplossen"
stap 6. Ik druk op de knop "ok"
stap 7. Ik stop de macrorecorder

Ik wijs de macro toe aan mijn knop.

Bij het activeren van de knop wordt VBA geopend en ontvang ik de compileerfout: Sub of Function is niet gedefinieerd.

De code in de module luidt:

SolverReset
SolverOk SetCell:="$E$18", MaxMinVal:=2, ValueOf:="0", ByChange:="$B$24"
SolverAdd CellRef:="$B$24", Relation:=1, FormulaText:="$B$26"
SolverAdd CellRef:="$B$24", Relation:=3, FormulaText:="$B$27"
SolverOk SetCell:="$E$18", MaxMinVal:=2, ValueOf:="0", ByChange:="$B$24"
SolverSolve
End Sub

Wie kan mij helpen met het oplossen van de compileerfout?

 

[Warme bakkertje]

Waarschijnlijk krijg je deze foutmelding als de Oplosser Add-in niet geinstalleerd is.
Extra > Invoegtoepassingen > Invoegtoepassing Oplosser en dan
VBE > Extra > Verwijzingen > Solver
Voor meer uitgebreide uitleg zie volgende

http://peltiertech.com/Excel/SolverVBA.html

Mvg

Rudi

 

[Harry Veen]

Waarschijnlijk krijg je deze foutmelding als de Oplosser Add-in niet geinstalleerd is.
Extra > Invoegtoepassingen > Invoegtoepassing Oplosser en dan
VBE > Extra > Verwijzingen > Solver
Voor meer uitgebreide uitleg zie volgende

http://peltiertech.com/Excel/SolverVBA.html

Mvg

Rudi

Bedankt Rudi voor je snelle reactie.

Het was even expirimenteren, omdat ik Solver32.dll wilde toevoegen in VBA. Ik heb Solver.xls toegevoegd in vba via bladeren, omdat hij niet beschikbaar was. De macro draait als een trein.

Ik ga nu jou verwijzingen goed bestuderen, omdat ik vrees dan mijn eindgebruikers deze mogelijkheid ook niet hebben geinstalleerd.

Mijn dank is enorm

Groet,

Harry

 

[Wigi]

Graag de vraag nog eventjes op opgelost zetten aub.