Is there a way to see where a table\field name is used in a query?

[Dave]

I have a number of queries and i am updating tables. Is there a tool that
allows me to see where a table and it's filed nmae is used inside access?

Thanks

 

[Douglas J Steele]

Total Access Analyzer, from FMS.
http://www.fmsinc.com/products/analyzer/index.html

If you're willing to do a more manual search, you can use tools such as Rick
Fisher's Find And Replace http://www.rickworld.com/products.html or Speed
Ferret from Black Moshannon http://www.moshannon.com/

 

[Danny J. Lesandrini]

Out at my site I've got an addin tool that includes code to analyze
queries for little things like you describe. Download the DataFast
utility and add it to your addins

http://amazecreations.com/datafast/

Alternatively, you can do some simple DAO code, like this ...


Function FindTable(ByVal strTable As String) As String

Dim dbs As Dao.Database
Dim qdf As Dao.QueryDef
Dim strOut as string

Set dbs = currentdb()
For Each qdf in dbs.Querydefs
If InStr(1,qdf.SQL, strTable) > 0 Then strOut = strOut & qdf.Name & ";"
Next
Set dbs = nothing
FindTable = strOut
End Function

 

[Dave]

Thank you both - this is a start!

Dave

Out at my site I've got an addin tool that includes code to analyze
queries for little things like you describe. Download the DataFast
utility and add it to your addins

http://amazecreations.com/datafast/

Alternatively, you can do some simple DAO code, like this ...


Function FindTable(ByVal strTable As String) As String

Dim dbs As Dao.Database
Dim qdf As Dao.QueryDef
Dim strOut as string

Set dbs = currentdb()
For Each qdf in dbs.Querydefs
If InStr(1,qdf.SQL, strTable) > 0 Then strOut = strOut & qdf.Name & ";"
Next
Set dbs = nothing
FindTable = strOut
End Function

--

Danny J. Lesandrini
(e-mail address removed)
http://amazecreations.com/datafast