Il codice per esportare in un File di testo te lo ho già scritto nell'altro 3D.... quindi lo puoi riciclare... posso esporti il Ciclo per puntare alle Queries...
Dim qdf As DAO.QueryDef
Dim intFile as Integer
IntFile=freeFile
For each qdf in DbEngine(0)(0).Querydefs
Open "C:\SQL_QUERIES.txt" For Append Shared As #intFile
Print #intFile, qdf.SQL & vbNewLine
Close #intFile
Next
Spero che tu possa, aprendo la Guida in Linea, renderti un pò più autonomo nella pianificazione del codice...
Saluti