Advanced Search

Return to Snippet

Revision: 76950
at August 7, 2019 21:31 by martinbrait
Initial Code 
Sub ListeRequetes()
   Dim DaBase As DAO.Database
   Dim ReqD As DAO.QueryDef
 
   Set DaBase = CurrentDb
   For Each ReqD In DaBase.QueryDefs
     Debug.Print ReqD.Name
   Next
 
   Set DaBase = Nothing
End Sub
Initial URL 

                                

                                                            

                                    

                                        

                                        Initial Description
                                        

                                    

                                    
List of access database queries

Pour tester, ouvre la fenêtre de Debug (CTRL G), et tapes-y 'ListeRequetes' et appuye sur la touche [Entrée].

                                

                                                            

                                    

                                        

                                        Initial Title
                                        

                                    

                                    
[vba-access] liste des requêtes d'une base access

                                

                                                            

                                    

                                        

                                        Initial Tags
                                        

                                    

                                    
list

                                

                                                            

                                    

                                        

                                        Initial Language
                                        

                                    

                                    
Visual Basic