Незнаю как открыть пакет

Для этого достаточно просто выбрать в меню нужную команду и нажать на неё. При установленной надстройке Поиск решения её можно запустить выбрав меню Сервис-Поиск решения...
Если же надстройка не установлена, то Сервис-надстройки, выберите Поиск решения и установите "флажок", затем кнопка OK.
Проверено MS Office 97, 2000
==================================================
CommandBars("Tools").Controls(10).Execute
CommandBars("Tools").Controls("Поиск &решения...").Execute
P.S. Номер и имя у Вас могут отличаться, но узнать их Вы можете сами без особого труда.

;)

Вот пишу следуюшии строки в редактор:

[COLOR=blue]Private Sub CommandButton1_Click()
CommandBars("Tools").Controls(10).Execute
CommandBars("Tools").Controls("Поиск &решения...").Execute
End Sub[/COLOR]

Вылетает ошыбка: Invalid procedure call or argument.Как быть?

Private Sub CommandButton1_Click()
CommandBars("Tools").Controls(10).Execute
Rem Только один из двух вариантов
CommandBars("Tools").Controls("Поиск &решения...").Execute
End Sub

Второй вариант для руссифицированного MS Office
Первый вариант, для команды (кнопки) в меню Сервис
под номером 10. Если у Вас другой, то просто замените его на свой.

Спасибо, так и зделал.