Берем Koala из примеров. Пишем к нему IDL. Компилим его MIDLом. Компонуем все в DLL (получившийся tlb указываем как ресурс). ВСЕ! Регим в реестре.
Заходим в офисный VB.
В референсес указываем наш сервер.
пишем

Dim myclass as НашСоКласс
set myclass = CreateObject("НашСоКласс")
...