Dans VBA, comment renvoyez-vous le nom d'une requête sous-jacente pour un objet de rapport?

Question

Je voudrais obtenir le nom d'une requête derrière un rapport spécifique. J'espérais faire quelque chose comme ça ...

Dim QueryName As String 
QueryName = CurrentProject.AllReports(MyReportName).RecordSource.Name 

Cependant, je sais que cela ne fonctionne pas, mais je voudrais trouver un moyen de le faire. Y a-t-il quelque chose que je néglige de toute évidence?

Answer 1

Vous devez ouvrir le rapport pour accéder à ces types de propriétés.

Ouvrir en mode conception afin de ne pas exécuter la chose.

Dim QueryName As String 

DoCmd.OpenReport MyReportName, acViewDesign 

QueryName = Reports(MyReportName).RecordSource 

DoCmd.Close acReport, MyReportName