"поиск решения" excel в цикле vba - Microsoft Office Excel

novak_26 · 25.02.2010, 20:20

Нажатием на кнопку выполняется поиск решения (подбор исходных параметров под нужный результат). При этом каждый раз excel стандартно выдает окно "Результаты поиска решения. Решение найдено. Все ограничения и условия оптимальности выполнены. Сохранить найденное решение? Да / Нет".
Я хочу задавать входные и выходные параметры поиска решения программно в цикле макроса. Можно ли избавиться от запроса "Сохранить найденное решение?" ?.

Dophin · 25.02.2010, 20:34

пример не смотрел.

Application.displayalerts = false не помогает?

The_Prist · 25.02.2010, 21:59

Код:

    SolverOk SetCell:=r(i), MaxMinVal:=3, ValueOf:=rez, ByChange:=s(i)
    SolverSolve True

novak_26 · 25.02.2010, 22:48

Application.displayalerts = false не помогло
SolverSolve True помогло

всем спасибо!

25.02.2010, 21:59	#3
The_Prist Участник клуба Регистрация: 17.07.2009 Сообщений: 1,088	Код: `SolverOk SetCell:=r(i), MaxMinVal:=3, ValueOf:=rez, ByChange:=s(i) SolverSolve True` WebMoney - R298726502453; Яндекс.Деньги - 41001332272872 www.excel-vba.ru

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Использование функции "поиск решения"	tobatoc	Microsoft Office Excel	1	02.02.2010 15:47
надстройка "поиск решения" не работает	ariksh	Microsoft Office Excel	1	20.06.2009 20:40
Помогите с "поиск решения"	pavke	Microsoft Office Excel	14	10.05.2009 19:28
"Транспортная задача", "Поиск решения"	Perroman	Microsoft Office Excel	3	12.12.2007 17:12

25.02.2010, 20:34	#2
Dophin Форумчанин Регистрация: 13.01.2010 Сообщений: 410	пример не смотрел. Application.displayalerts = false не помогает?

25.02.2010, 22:48	#4
novak_26 Пользователь Регистрация: 23.02.2010 Сообщений: 39	Application.displayalerts = false не помогло SolverSolve True помогло всем спасибо!