Função SolverLoad

Carrega parâmetros do modelo do suplemento Solver existentes que foram salvos na planilha.

Nota O suplemento Solver não está habilitado por padrão. Antes de poder usar esta função, você deve ter o suplemento Solver habilitado e instalado. Para saber mais sobre como fazer isso, consulte Usando as funções VBA do Solver. Após a instalação do suplemento Solver, você deverá estabelecer uma referência para o suplemento Solver. No Editor do Visual Basic, com um módulo ativo, clique em Referências, no menu Ferramentas e clique em Solucionador nas Referências disponíveis. Se o Solver não aparecer em Referências Disponíveis, clique em Procurar e então abra Solver.xlam na subpasta \Arquivos de Programas\Microsoft Office\Office14\Biblioteca\SOLVER.

SolverLoad( LoadArea, Merge)

LoadAreaVariant obrigatória. Uma referência na planilha ativa para um intervalo de células a partir do qual você deseja carregar uma especificação completa do problema. A primeira célula no LoadArea contém uma fórmula para a caixa Definir Célula de Destino na caixa de diálogo Parâmetros do Solucionador ; a segunda célula contém uma fórmula para a caixa Por Alterar Células ; As células subsequentes contêm restrições na forma de fórmulas lógicas. Opcionalmente, a última célula contém uma matriz de valores de opção do Solver. Para saber mais, confira SolverOptions. O intervalo representado pelo argumento LoadArea pode estar em qualquer planilha, mas você deve especificar a planilha se não for a planilha ativa. Por exemplo, SolverLoad("Sheet2!A1:A3") carrega um modelo da Planilha2, mesmo que não seja a planilha ativa. MergeVariant opcional. Um valor lógico correspondente ao botão Mesclagem ou ao botão Substituir na caixa de diálogo que aparece depois de selecionar a referência LoadArea e clicar em OK. Se True, as seleções e restrições de célula variável do LoadArea serão mescladas com as variáveis e restrições definidas atualmente. Se False ou omitido, as especificações e opções do modelo atual serão apagadas (equivalentes a uma chamada à função SolverReset ) antes que as novas especificações sejam carregadas.

Exemplo

Este exemplo carrega o modelo do Solver calculado anteriormente e armazenado em Sheet1, altera uma das restrições e resolve novamente o modelo.

Worksheets("Sheet1").Activate 
SolverLoad loadArea:=Range("A33:A38") 
SolverChange cellRef:=Range("F4:F6"), _ 
 relation:=1, _ 
 formulaText:=200 
SolverSolve userFinish:=False

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.