Макрос в ехеле - нужна помощь

maggi14

В первую очередь, не совет, а именно помощь. Хотя от совета тоже не откажусь.
У кого установлен компонент "Поиск решения" - сделайте, плз, такую фишку.
запишите макрос с поиском решения с изменяемым диапазоном в две ячейки (допустим, R1C2 и R1C3 выходной ячейкой R1C1 и условием минимума.
Попробуйте запустить из редактора ВБА получившийся макрос.
Сенкс.

Varvara2002

запишите макрос с поиском решения с изменяемым диапазоном в две ячейки (допустим, R1C2 и R1C3 выходной

Делал, в чем проблемы то конкретно?

maggi14

У меня проблемы в том, что нет нужного компонента. Извратной хитростью удалось заставить записать этот макрос, но не могу воспроизвести и протестировать. Говорит, функция не определена, тыры-пыры.
У клиента то же самое, хотя компонент есть.
А какой код у тебя создался?

Varvara2002

А какой код у тебя создался?

SolverOk SetCell:=Worksheets(1).Cells(beginDataTableNelOcX + curString, beginDataTableNelOcY + 2).Address,
MaxMinVal:=2,
ValueOf:="0",
ByChange:=Worksheets(1).Cells(beginDataTableNelOcX + curString, beginDataTableNelOcY + 0).Address & ":" & Worksheets(1).Cells(beginDataTableNelOcX + curString, beginDataTableNelOcY + 1).Address
SolverSolve
Не обращай внимания на извращенские адреса.
А можешь найти в редакторе макросов Tools-> References
SOLVER и подключить его?

maggi14

Уже попробовал. Не получилось. Возможно, из-за того, что офис у меня 2000, а сольвер, наверно, 2003.
Спасибо, буду думать дальше

Varvara2002

Тебе срочно надо?

maggi14

Уже попробовал. Не получилось. Возможно, из-за того, что офис у меня 2000, а сольвер, наверно, 2003.
Спасибо, буду думать дальше
Да, а потом SolverSolve вызывается?

maggi14

чем срочнее, тем лучше. Но у меня уже сомнения в том, что проблема на моей стороне. Мой код совпадает с твоим.

Varvara2002

Да, а потом SolverSolve вызывается?

Да.

maggi14

ясно, спасибо

Varvara2002

Мой код совпадает с твоим.

Я не спец в VBA, но вроде если он не находит функцию, то проблема на твоей стороне.

maggi14

Ты говоришь, что этот код у тебя работает. У клиента не работает. Значит, проблема где-то в настройках клиента. У меня тоже не работает, но тут причина очевидна: нет компонента.

Varvara2002

Похоже я тебя слегка не правильно понял.