Altro Stampa dati Recordset su foglio Excel (VBA)

[Hope]

Salve,
dovrei stampare tutti i risultati salvati su un recordset sul mio foglio di lavoro.
Il seguente codice è quello di stampa, ma non ho la minima idea su come inserire la variabile rs contenente i valori importati da database SQL Server.

For Each WS In ThisWorkbook.Worksheets
        With WS
            'riga = .Range("A" & .Rows.Count).End(xlUp).Row + 1
            .Range("A1").Value = "Cognome"
            .Range("B1").Value = "Nome"
            .Range("C1").Value = "AZIENDA"
            .Range("D1").Value = "DATA"
            .Range("A1:B1:C1:D1").Font.Bold = True
            .Range("A2").Value = "aa"
            .Range("B2").Value = "bb"
            .Range("C2").Value = "cc"
            .Range("D2").Value = "dd"
        End With
    Next WS

Grazie in anticipo a chi mi aiuterà.