Run-time error '-2147467259 (80004005)': [Microsoft][ODBC SQL Server Driver]Invalid use of default parameter

I have code written in vba that inserts data, via Excel, into SQL-Server.  So far everything works well.  However, sometimes it does not work. 

When it does not work, I receive the following error: Run-time error '-2147467259 (