Export Data with Formatting and Layout Using Form

[atfaniqbal]

Export Query Data with Formatting and Layout Using A Button On Form Before Or After DoCmd.TransferSpreadsheet

Please Help...

 

[Isskint]

This is probably one of the top topics on the forum. have a look at these;

http://www.access-programmers.co.uk/forums/showthread.php?t=247517&highlight=export+to+excel
http://www.access-programmers.co.uk/forums/showthread.php?t=171271&highlight=export+to+excel

Or have a look at Bob Larsons site for some good examples, like http://www.btabdevelopment.com/ts/tq2xlspecwspath

 

[atfaniqbal]

The Above Links Couldn't Provide The Required Help..

 

[Isskint]

No help, eh

So what do you have in place at the moment?

How are you transferring the data?
What have you tried to apply the formatting already in place?

 

[atfaniqbal]

As Of Now Nothing Applied But Need Code For Formatting The FieldNames To AutoFit The Column By Cell Data Of The Resultant Exported Query.

Using The Below Code To Export The Query :-
Private Sub Export_Click()
Dim Response As String
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, HasFieldNames:=True, tablename:="query", FileName:="Files Not Recieved - " & Format(Now, "dd-mm-yyyy") & ".xlsx"
Response = MsgBox("Your File Has Been Saved To Your Current Directory (Usually Files Not Recieved - dd-mm-yyyy.xlsx).", vbOKOnly, "File Saved")
End Sub

No help, eh

So what do you have in place at the moment?

How are you transferring the data?
What have you tried to apply the formatting already in place?