Obrigado pela rapidez na resposta, e desculpe não ter localizado antes, estava procurando em consultas.
Pois bem, é isto mesmo que preciso, só que com um detalhe, preciso que o resultado da consulta criada no código alimente uma tabela,
até modifiquei para ver se conseguia, mas não deu certo no final.
Private Sub Comando121_Click()
DoCmd.RunMacro "Exporta_Cadastros"
If IsNull(Me.Numero_Registros_Exp) Then
MsgBox "Preencha A quantidade de Clientes que deseja Visualizar", vbCritical, "Atenção!!!"
Me.Numero_Registros_Exp.SetFocus
Else
'Variavel Recebe a Quantidade (TOP xxx)
nTop = Me.Numero_Registros_Exp
'Constroi a COnsulta add a quantidade do TOP
strSql = "SELECT TOP " & nTop & " FROM Dados_Exportados"
'Mostra como esta a Consulta (apenas para o Aprendizado, comentar...)
'MsgBox "Veja a Construção Total da Consulta: " & strSql
'Preenche a Lista com os valores da consulta
Me.Cadastro_Clientes_Exportar_Form.RowSource = strSql (ESTA TABELA CADASTRO_CLIENTES_EXPORTAR)
'Me.Lista0.RowSource = strSql
End If
End Sub