Macro from 2010 not working correctly in 2013

I have tested the majority of the code from my Office 2010 macros on a Office 2013 machine, but one part seems to need updating.

Sub RunQuery(Cnnect, SQLStuff, NameofRange)
     
    With ActiveSheet.QueryTables.Add( _
        Connection:=Cnnect, _
        Destination:=Range("$A$1"), _
        Sql:=SQLStuff)
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .BackgroundQuery = False
        .Name = NameofRange
        .RefreshPeriod = 0
        .Refresh BackgroundQuery:=False
        .RefreshStyle = xlInsertDeleteCells
        .SaveData = True
        .Refresh
    End With

End Sub

It breaks at the ".Refresh BackgroundQuery:=False" line, which means it isn't updating/pulling the data.

I had read that if you remove the 'ODBC;' part from the query language it would work but that turned out untrue.

Can anyone assist?

None of those seem to apply to what I am doing, but I will admit I am not big on SQL.

Are you talking about changing the ODBC Query string, or the VB Code?

Unfortunately, I don't have access to a machine that I can do that, but I am expected to write code for it for others that do, even if I cannot use their computers to find out how.

When I find out the proper code, I will post it.