VBA databasekald til Excel, blanke kolonne?

Jeg har det problem at jeg skal hente en del data over i et ark jeg skal arbejde videre med. Mit databasekald skulle gerne se ud som følger ud fra min sql erfaring med VBA.

    With ActiveSheet.QueryTables.Add(Connection:= _
        "ODBC;DSN=Innoflex;DBQ=q:\data;DecimalOption=.;SERVER=NotTheServer", _
        Destination:=Range("A2"))
        .CommandText = Array( _
        "SELECT MANDSKAB.NAVN, MANDSKAB.NR, MANDSKAB.GRUPPE, "","","","", MANDSKAB.ADRESSE1, MANDSKAB.ADRESSE2, MANDSKAB.ADRESSE3" & Chr(13) & "" & Chr(10) & "FROM MAND" _
        , "SKAB MANDSKAB" & Chr(13) & "" & Chr(10) & "ORDER BY MANDSKAB.NR")
        .Name = "Forespørgsel fra Innoflex"
        .FieldNames = False
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = True
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .PreserveColumnInfo = True
        .Refresh BackgroundQuery:=False
    End With

dette er som første udkast optaget med en makro, og så har jeg indsat "","","","" da jeg ikke vil have hentet værdier over i de kolonner, problemet er bare at det åbenbart er den forkerte syntax, er der nogen der kan hjælpe med hvordan syntaxen skal være hvis de 4 kolonner skal holdes blanke! På forhånd tak. :-)