Boa Tarde!

Estou tentando rodar uma macro que contém a função solver e o seguinte erro
ocorre: " Erro de compilação: ‘Sub’ ou ‘Fuynction’ não definida"

Segue abaixo a macro criada para um exemplo simples.

Sub Macro1()
'
' Macro1 Macro
' Macro gravada em 21/7/2006 por felimabr
'

'
SolverOk SetCell:="$AA$5", MaxMinVal:=2, ValueOf:="0", ByChange:="$Y$5"
SolverSolve
End Sub

Alguém pode me informar o que deve ser feito para que o solver funcione em
conjunto com a Macro.

Desde já agradeço,

Att,
Pascoal

Oi Pascoal,

abra a janela do VBA (ALT+F11), clique no menu Ferramentas > Referências e
assinale o item Solver.xla

Se ele não estiver listado, clique em Procurar e localize o Solver.xla, que
deve estar na pasta c:\Arquivos de programas\Microsoft
Office\Office11\Biliote\Solver (lembre-se de mandar mostrar arquivos do tipo
xls e xla, senão ele vai listar apenas dll e ocx).



--
Luiz Cláudio C. V. Rocha
Coordenador de Projetos FórumAccess
São Paulo - Brasil
MVP Office
http://www.msmvps.com/officedev


"Pascoal" escreveu:

> Boa Tarde!
>
> Estou tentando rodar uma macro que contém a função solver e o seguinte erro
> ocorre: " Erro de compilação: ‘Sub’ ou ‘Fuynction’ não definida"
>
> Segue abaixo a macro criada para um exemplo simples.
>
> Sub Macro1()
> '
> ' Macro1 Macro
> ' Macro gravada em 21/7/2006 por felimabr
> '
>
> '
> SolverOk SetCell:="$AA$5", MaxMinVal:=2, ValueOf:="0", ByChange:="$Y$5"
> SolverSolve
> End Sub
>
> Alguém pode me informar o que deve ser feito para que o solver funcione em
> conjunto com a Macro.
>
> Desde já agradeço,
>
> Att,
> Pascoal
>

Luiz,

O problema foi resolvido com êxito!

Muito obrigado pela ajuda.

Att,

Pascoal Boniolo

"Luiz Cláudio C. V. Rocha" wrote:

> Oi Pascoal,
>
> abra a janela do VBA (ALT+F11), clique no menu Ferramentas > Referências e
> assinale o item Solver.xla
>
> Se ele não estiver listado, clique em Procurar e localize o Solver.xla, que
> deve estar na pasta c:\Arquivos de programas\Microsoft
> Office\Office11\Biliote\Solver (lembre-se de mandar mostrar arquivos do tipo
> xls e xla, senão ele vai listar apenas dll e ocx).
>
>
>
> --
> Luiz Cláudio C. V. Rocha
> Coordenador de Projetos FórumAccess
> São Paulo - Brasil
> MVP Office
> http://www.msmvps.com/officedev
>
>
> "Pascoal" escreveu:
>
> > Boa Tarde!
> >
> > Estou tentando rodar uma macro que contém a função solver e o seguinte erro
> > ocorre: " Erro de compilação: ‘Sub’ ou ‘Fuynction’ não definida"
> >
> > Segue abaixo a macro criada para um exemplo simples.
> >
> > Sub Macro1()
> > '
> > ' Macro1 Macro
> > ' Macro gravada em 21/7/2006 por felimabr
> > '
> >
> > '
> > SolverOk SetCell:="$AA$5", MaxMinVal:=2, ValueOf:="0", ByChange:="$Y$5"
> > SolverSolve
> > End Sub
> >
> > Alguém pode me informar o que deve ser feito para que o solver funcione em
> > conjunto com a Macro.
> >
> > Desde já agradeço,
> >
> > Att,
> > Pascoal
> >