Paramètre par VBA

Paramétrer une requête en fonction d'une variable VBA

Dans une requête nommée "LaRequeteParametree", saisir le critère comme ceci :
 

Like [Forms]![Nom du Formulaire].[LeParametre]

Dans le Formulaire nommé "LeFormulaire", déclarer la variable comme ceci :

Public LeParametre As String

On exécutera par exemple le code suivant sur événement clic d'un bouton :
 

Private Sub BtnExportRequete_Click()

    LeParametre = InputBox("Critère d'exportation ?")

    DoCmd.OutputTo acOutputQuery, "LaRequeteParametree", acFormatXLS,"C:Mes Documents" & LeParametre & ".xls"

End Sub


Dernière modification : 07/02/2010 23:45
Catégorie : Les mémos - Requêtes
Page lue 12005 fois