Pergunta : Acesso da exportação aos spreasdsheets do formato de Excel

Eu tenho o código abaixo daquele trabalho grande, divido uma pergunta do acesso em diversos diferentes primo relatórios e conservo-os a uma movimentação. a pergunta do
My está lá toda a maneira para que eu adicione o formato durante este processo ou é algo que eu tenho que fazer em Excel depois que todas as limas foram atualizados? artigos que do
Formatting eu gostaria: mudar a pia batismal a Times New Roman, tamanho 10, bold(realce) o
Thank dos nomes de campo (fileira 1) você adiantado para todo o assistance.
 class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
>Private notpretty Command1_Click secundários " do class= " do id= " codeSnippet791490 do 
 0 de Err.Number = CurrentDb.CreateQueryDef (do “relatório aniversário”)
No erro 0 empreendedores
 
strQry = “Departments1 SELETO. [RestNumber] da ORDEM Departments1 por Departments1. [RestNumber]; ”
Ajustar o rst = o CurrentDb () .OpenRecordset (strQry, o dbOpenDynaset)
rst.MoveLast
rst.MoveFirst
 
 
Fizerem quando não rst.EOF
Trajeto = “C:\RestaurantReports\”
StrBU = rst (“RestNumber”)
'StrExt = “_EmployeeRoster_” & Me.ExportDate & “.xls”
StrExt = “- relatório do aniversário de julho” &” .xls "
strFile = trajeto & StrBU & StrExt
intDcode = rst (“RestNumber”)
qDef.SQL = “SELECIONAM * de QryBirthdayReport ONDE RestNumber =” & intDcode & o ""
 
acOutputQuery de DoCmd.OutputTo, do “relatório aniversário”, acFormatXLS, strFile, falso

rst.MoveNext
Laço
 
MsgBox (“exportação completa”)
Ajustar o rst = nada
 
Exit_Command1_Click:
    Retirar o submarino
 
Err_Command1_Click:
    MsgBox Err.Description
    Resumo Exit_Command1_Click

Submarino da extremidade
class= do

Resposta : Acesso da exportação aos spreasdsheets do formato de Excel

Supr que o problema está no transporte. Comutar de volta ao transporte da troca e autoreply no shoul da probabilidade que trabalha corretamente
Outras soluções  
 
programming4us programming4us