[Resolvido]Caixa de Seleção nao Aparece na extração do relatorio em CVS

Boa tarde!

Estou com um impasse aqui, Ja aconteceu com alguém???

Se o relatório tiver caixa de seleção, ele não extrai no xls, somente os campos normais.

a imagem abaixo não esta aparecendo no XLS

IMAGEM EXEMPLO

Código:

On Error Resume Next
Dim strArquivo As String


'Abre o relatório devidamente filtrado e oculto
DoCmd.OpenReport "RELATORIO NOVARTIS INF_APLI", acViewPreview, acHidden
 
'Gera arquivo pdf do relatório previamente aberto e filtrado.
DoCmd.OutputTo acOutputReport, "RELATORIO NOVARTIS INF_APLI", acFormatXLS

Abraços

Transforme as caixas de seleção em texto.

Só ir na consulta que dá origem ao relatório e alterar os campos que são caixa de seleção para o padrão a seguir:

Código:

NovoNomeProCampo: SeImed([Campo]=0;"N";"S")

exemplo

Código:

txtADIT_XOLAIR_ASM: SeImed([ADIT_XOLAIR_ASM]=0;"N";"S")

E então crie o relatório novamente.

Ivan

obg

RESOLVIDO.