Microsoft Access 2007 é o programa de banco de dados do Windows com a interface de consulta gráfica . Correndo consultas em bancos de dados Access 2007 dá aos usuários a capacidade de recuperar e filtrar os dados , calcular totais dados numéricos e automatizar actualização ou supressão de registros do banco de dados . As funções de consulta de acesso são baseados na linguagem de consulta SQL. O Visual Basic for Applications (VBA ) suporta instruções SQL nas funções do VBA. Ele permite aos usuários executar uma consulta no banco de dados Access 2007 usando o controle VBA. Instruções
1
Clique no botão "Iniciar " do Windows e selecione a opção " Microsoft Office", "Visual Basic for Applications (VBA) ."
2
Clique no botão " Open " e selecione o controle VBA do relatório sobre o qual você deseja alterar a ordem de classificação
3
Adicione o seguinte código após o ". linha CurrentDb.Execute strSQL " em sua consulta VBA:
On Error GoTo Err_Handler
Dim strSQL As String
strSQL = "SELECT sbqryAdmitDeals.lt_name " & _
" sbqryAdmitDeals.FullName , sbqryAdmitDeals.RoleLeadFK "& CDate ( Format ( Now () , " Short Date ") ) - [ RepRecd ] AS dias, 2 AS NúmeroDoPedido
" INTO " [ Your Name Variable]
" FROM sbqryAdmitDeals "
"ONDE sbqryAdmitDeals.RoleLeadFK ) ="
DoCmd.SetWarnings Falso
DoCmd.RunSQL strSQL
DoCmd.SetWarnings verdadeira
ExitMySubName :
Exit Sub
Err_Handler :
DoCmd.SetWarnings verdadeira
MsgBox Err.Description , vbExclamation , " Número do erro: " & Err.Number
Resume ExitMySubName
End Sub
4
Clique no comando " consulta Wizard" na fita Access.
5
Digite o seguinte consulta no campo de texto :
Selecione sbqryAdmitDeals.lt_name CDate ( Format ( Now () , "Short Date") - [ RepRecd ] aS dias, 2 aS NúmeroDoPedido INTO mtblFSRcvd
dE sbqryAdmitDeals
WHERE ( ( sbqryAdmitDeals.RoleLeadFK ) = [ Formulários] [ frmReports ] [ cboPrimaryContact ] !) ;
6
Clique no botão "Run" para executar a consulta em seu Acesso 2007 banco de dados usando o controle de VBA.