есть dll экспортирующая функцию объявленную с.о.
NTSTATUS GetSal(PULONG pSal);

в макросе VBA пытаюсь эту функцию вызвать
Private Declare Function GetSal Lib "Ext.dll" (ByRef Sal As Long) As Long

Dim Status As Long
Dim Sal As Long

Status = GetSal(Sal)

получаю ошибку Type mismatch
как сделать правильно ?