La cosa più completa è esportare le Form in un File di Testo ed analizzare il contenuto cercando il Nome dell'Oggetto(Query).
Il metodo di Esportazione deve essere questo, ma è un membro Nascosto:
Sub SaveAsText(ObjectType As AcObjectType, ObjectName As String, FileName As String)
Membro di Access.Application
Application.SaveAsText acForm, FormName, FileDest
Chiaramente se ti fai un ciclo sulla collection AllForms e le esporti tutte, poi con NotePad ti risulta semplice...
Senza alcuna pretesa, quello che trovi sotto è un giochetto che ho pubblicato ma non è completamente finito... che fa diverse cosette tra cui questa.
Vedi se ti può aiutare...
http://forum.masterdrive.it/access-79/find-replace-and-77916/