I have made it work,
Instead of:
ActiveCell.FormulaR1C1 = "=FuzzyVLookup(RC[-1],'[BAZA_USPOREDBA.xlsm]BAZA_KOMPLET'!R1C1:R200C2,2,,,3)"
This works:
ActiveCell.Formula = "=FuzzyVLookup(" & Kol & "" & Rasp & ",'[BAZA_USPOREDBA.xlsm]BAZA_KOMPLET'!A1:B200,2,,,3)"
regards