RATE function in VBA not working

Hello Everyone,   My issue is that the RATE formula works in my Excel spreadsheet when I use the following:     However, when I try to replicate this in VBA code, I get Run-time error '5' ...