Outputo - Through Button

[SRIKANTHBENONI]

Hi All,

I have created a form and same was assigned as parameters to a Query, i have even have a "Ok Button" in the form. Am facing a problem here, when i click the Button(OK) i has to run the Query and save the report to specific folder or path

Infor:


Private Sub OK_Click()
Me.Visible = False
DoCmd.OpenQuery "MULTIPLE", acViewNormal, acEdit
DoCmd.Close acForm, "MONTH"

End Sub


Could someone help me to run the query through form and save the report in Excel formate.

 

[Trevor G]

Take a look at the MACRO side and look for an Action called TransferSpreadsheet, once you master it you can then convert it to a DoCmd.TransferSpreadsheet.

Or Simple look to add the code

Sub out1()
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, "queryName", "Drive and spreadsheet name.xls", True
End Sub