Простой пример вызов DLL из макроса Excel

[Averinsergey]

Добрый день! Перевернул весь форум, но так и не нашел ответ на свой вопрос. У меня достаточно слабые познания в программировани. Но прошу привести пример кодов в макросе Excel и в Delphi, думаю многим это будет интересно.
Ситуация такая: у меня написан огромный макрос в excel, для прятанья кода, хочу часть убрать в Dll.
Пример:
--------------------------------------------
'В Макросе Excel
Private Sub Obrabotka_Click()
'здесь всякие команды для обработки ячеек и т.п.
.....
ВЫЗОВ DLL ДЛЯ ДАЛЬНЕЙШЕЙ ОБРАБОТКИ ЯЧЕЕК (ПРОСТО ВЫЗОВ, БЕЗ ПЕРЕДАЧИ КАКИХ ЛИБО ПАРАМЕТРОВ). По окончании обработки, файл dll должен вернуть управление макросу.
.....
'здесь всякие команды для обработки ячеек и т.п.
End Sub
-------------------------------------------
Теперь про оформелние Dll на Deplhi.
Когда макрос передаст управление dll я из dll подключаюсь к excel:
-------------------------------------------
//код Delphi
uses ComObj;

//ЧТО ЗДЕСЬ ПИСАТЬ?

var
Excel: Variant;
begin
Excel := GetActiveOleObject('Excel.Applicati on');
//дальнейшие мои манипуляции
end;
end.
--------------------------------------------
а теперь вопросы:
1) Как из макроса Excel вызвать этот файл, к примеру имя его будет My.dll. Будет он находится в том же каталоге что и файл Excel. Как правильно декларировать или что то еще. как правильно все прописать?
2) К сожалению не знаю что писать в шапке Delphi, сам понимаю что кучу всего пропустил. Все те переменные которые нужны будут для обработки файла Excel я добавлю, но процедуру или функцию, как правильно написать?

Спасибо!

[Averinsergey]

Наверно загнул я с вопросом, тогда еще упращу:
есть макрос:
----------------------------
Private Sub Obrabotka_Click()
'ЗДЕСЬ НАДО ВЫЗВАТЬ DLL
End Sub
-----------------------------

Код Delphi:
----------------------------
// ЧТО ЗДЕСЬ НАДО ПИСАТЬ, ЧТО Б СКОМПЕЛИРОВАЛАСЬ DLL
// И ПРИ ВЫПОЛНЕНИИ ПРОСТО ВЫВОДИЛА НА ЭКРАН СООБЩЕНИЕ "ПРИВЕТ МИР"
----------------------------
Спасибо.

[Averinsergey]

Никто мне тут к сожалению так и не помог, помогли в другом месте.
Сам спрашивал, сам и отвечаю, наверняка кому нить понадобится.

код макроса экселя:
Declare Function f_dll Lib "c:\my.dll" ()
Sub TestMacros()
f_dll
End Sub

а вот и сам код в Delphi:
library My;
uses SysUtils, Classes, Dialogs;
function f_dll():string;stdcall;
begin
Showmessage('Hello World!!!');
end;
exports f_dll;
begin
end.