Mój kawałek kodu

Dim sgt As Insert.Subiekt
Dim dok As Insert.SuDokument
Dim poz As Insert.SuPozycja

Set sgt = SubGT()
Set dok = sgt.SuDokumentyManager.DodajFS

Dim wiersz As Long
Dim TWid As Integer
Dim MRid As Integer
Dim ilosc As Currency

TWid = CInt(Cells(wiersz, "I"))
MRid = CInt(Cells(wiersz, "J"))
ilosc = Round(CCur(Cells(wiersz, "K")), 3)

Set poz = dok.Pozycje.Dodaj(TWid)
poz.Dysponuj(MRid, ilosc)

dok.Wyswietl
dok.Zamknij

przy wpisywaniu linijki "poz.Dysponuj(MRid, ilosc)" dostaję komunikat "Complie error: Expected:="
a po uruchomieniu procedury "Complie error: Syntax error"
nic z tego nie rozumiem

gdy użyję
poz.IloscJm = ilosc
wszystko jest OK - prawidłowy dokument powstaje (więc reszta kodu wygląda na prawidłową), ale ja potrzebuję WSKAZAĆ konkretne dostawy

Proszę o pomoc.
Co robię nie tak w tym Basicu, że otrzymuję błąd składniowy ?