Debug.Print Stored SQL Querys

[Noob]

Hi,

I am trying to just write a little test to output the stored Query Names & the SQL strings within them.



How I find it manually:

Select the query, and then right click on it. Select "DesignView". From there click SQL & it reveals the statement.

How would I do that in VBA?

I have a Do loop where the queries are being executed. I can output the query name but not the SQL statement as a text string to the immediate window. I tried “.value” but it gives me an integer. I want to preview/ output the SQL string to the immediate window before it is executed.

TIA

Noob

[ssanfu]

It would really help if you posted the VBA code...... I'm just sayin.,,,,,,

[davegri]

debug.print CurrentDb.QueryDefs("qMyQuery").SQL

[Noob]

It would really help if you posted the VBA code...... I'm just sayin.,,,,,,

@ssanfu No doubt, but the company has data protection on lock down. I can't even send myself an e-mail among other things. lol...

[Noob]

@davergri thanks that looks about right. I am going to test it & will post back ASAP.

[orange]

You will need a loop to show sql for all queries. Something along the lines of the following:
eg
For each qdf in Currentdb.querydefs
debug.print qdf.name & vbtab & qdf.sql
Next qdf

[Noob]

Cool thanks @orange.

I am going to test that too. Thanks so... much

[Noob]

Haha......

Yup!!!

Debug.Print CurrentDB.QueryDefs(rst!QRY_Name).SQL

works great inside that Do Loop. Thanks again @davergri

And the For Loop you shared @orange works great for a general purpose dump. WHOA!!! thanks alot.

Best of all I understand whats going on there now.