Hi
How shoud i activate the solver (if possible) from a macro?

Peter

Hi,

Try:-

Sub ordinate()
SolverOk SetCell:="$C$1", MaxMinVal:=3, ValueOf:="8", ByChange:="$A$1"
SolverSolve
End Sub

Mike


"P Sellmeijer" wrote:

> Hi
> How shoud i activate the solver (if possible) from a macro?
>
> Peter

> Hi Mike,

Thanks for your reply.
Unfortunaly while running your macro i get an error at 'SolverOk" or
"SolverSolve"
with the comment "Sub or Function not5 defined".
I suppose that something should be declaired, but i do'nt know.

Peter
>
> Try:-
>
> Sub ordinate()
> SolverOk SetCell:="$C$1", MaxMinVal:=3, ValueOf:="8", ByChange:="$A$1"
> SolverSolve
> End Sub
>
> Mike
>
>
> "P Sellmeijer" wrote:
>
>> Hi
>> How shoud i activate the solver (if possible) from a macro?
>>
>> Peter

Look up any Solver related topic (for example SolverSolve) in XL VBA
help. The 2nd paragraph will tell you what you have to do to make it
work.

In article <5D6AC8E5-B1DD-4C6F-9E9A-(E-Mail Removed)>,
(E-Mail Removed) says...
> > Hi Mike,
>
> Thanks for your reply.
> Unfortunaly while running your macro i get an error at 'SolverOk" or
> "SolverSolve"
> with the comment "Sub or Function not5 defined".
> I suppose that something should be declaired, but i do'nt know.
>
> Peter
> >
> > Try:-
> >
> > Sub ordinate()
> > SolverOk SetCell:="$C$1", MaxMinVal:=3, ValueOf:="8", ByChange:="$A$1"
> > SolverSolve
> > End Sub
> >
> > Mike
> >
> >
> > "P Sellmeijer" wrote:
> >
> >> Hi
> >> How shoud i activate the solver (if possible) from a macro?
> >>
> >> Peter
>
>