Presupposto che la tabella di DB esista già (altrimenti la devi creare con i relativi campi)devi aprire il collegamento con il DB e poi fai un Insert, così:
codice:
'Salva nel DB TblFullSP i Dati delle
'FrmSP (codice in un modulo bas):
Public Sub SalvaFullSP()
        On Error Resume Next
'Inserimento dei dati nel DB - TblFullSP:
        Dim OggSPF As New ADODB.Command
        Dim ConnSPF As New ADODB.Connection
 
 'Esegue la connessione con il DataBase TblFullSP:
        With ConnSPF
            .ConnectionString = DataConnessione
            .CursorLocation = adUseClient   'tipo di cursore
            .Mode = adModeShareDenyNone     'nessuna limitazione
            .CommandTimeout = 15
            .Open
        End With
        
        OggSPF.ActiveConnection = ConnSPF
        OggSPF.CommandType = adCmdText

'Prima di salvare Elimina i vecchi records dalla tabella - TblFullSP:
        OggSPF.CommandText = "Delete * From TblFullSP"
        OggSPF.Execute

'Salva:
        OggSPF.CommandText = "insert into TblFullSP(Descrizione, Anno1, Anno2, ..., ...)" _
        & "values ('" & Replace(FrmSP.Txt1SPL.Text, "'", "''") & "', '" & (FrmSP.Txt1SP.Text) & "',  '" & (FrmSP.Txt2SP.Text) & "', '" & (...) & "');"
        OggSPF.Execute

... ... ...
'Chiude la connessione - TblFullSP:
        ConnSPF.Close
        Set ConnSPF = Nothing

End Sub