Being on a restricted budget, I don't have the luxury of using tools like "Speed Ferret" and others. Often, I find myself in the position of having to change Field Names in tables, which breaks queries, forms, reports, macros, and vba code. While it would be wonderful to be able to cross-reference a field name and get a list of all the things I am going to break [u]in advance</u>, right now, I would settle for something that would just tell me which queries I have broken by changing a field name.

Would anyone have an idea how to do that in VBA?

I originally tried enumerating all queries and checking for a Field count of 0, but that was not conclusive. It did find some broken queries, but not a lot. Here is my code:


dim db as dao.database
dim qdf as dao.querydef
    set db = currentdb
    for each qdf in db.querydefs
        if qdf.fields.count = 0 then
            debug.print qdf.name
        end if
    next qdf


--- Tom

__________________
--- Tom