= " & numero1 & " ORDER BY " & _<br> "Location, Service, [Part #]"<br> Set definition = db.CreateQueryDef("ExportQuery", info)<br> Else<br> Set definition = db.QueryDefs("ExportQuery"

<br> End If<br> <br> definition.Parameters![num] = numero1<br> <br> DoCmd.TransferSpreadsheet acExport, 5, "ExportQuery", path, -1<br> MsgBox "exported Quote # " & numero1<br> <p>Walt III<br><a href=mailto:SAElukewl@netscape.net>SAElukewl@netscape.net</a><br><a href=