MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Formatar texto para Numero antes de exportar para excel

    avatar
    Convidado
    Convidado


    [Resolvido]Formatar texto para Numero antes de exportar para excel Empty Formatar texto para Numero antes de exportar para excel

    Mensagem  Convidado 14/10/2013, 19:06

    Boa noite senhores !

    Estou tentando formatar os campos de uma consulta antes de exportar para excel mas nao estou conseguindo.

    Não da erro mas tbm não exportar.

    .....
    strSQL = "Select Tipo, CDbl(Peso)as Peso1,.....varios outros campos From Qry_RelatorioDiario"
    Set rst = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset)
    xls.Worksheets("IMPORTAR").Activate
    xls.ActiveSheet.Range("A35").Select
    xls.ActiveCell.CopyFromRecordset rst


    Já Tentei tbm...
    strSQL = "Select Tipo, CLng(Peso)as Peso1
    strSQL = "Select Tipo, Round(Peso,2)as Peso1
    strSQL = "Select Tipo, Int(Peso)as Peso1


    Se eu usar somente strSQL = "Select Tipo, Peso From Qry_RelatorioDiario" Funciona mas o campo vai para o excel como texto e preciso que vá como numero.


    Alguma sugestão!

    Obrigado
    avatar
    Convidado
    Convidado


    [Resolvido]Formatar texto para Numero antes de exportar para excel Empty Re: [Resolvido]Formatar texto para Numero antes de exportar para excel

    Mensagem  Convidado 16/10/2013, 20:09

    Up !
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Formatar texto para Numero antes de exportar para excel Empty Re: [Resolvido]Formatar texto para Numero antes de exportar para excel

    Mensagem  JPaulo 16/10/2013, 22:22

    Ola,

    O amigo já tentou dar a formatação direto na consulta Qry_RelatorioDiario" ?



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Formatar texto para Numero antes de exportar para excel Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Formatar texto para Numero antes de exportar para excel Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Formatar texto para Numero antes de exportar para excel Folder_announce_new Instruções SQL como utilizar...
    avatar
    Convidado
    Convidado


    [Resolvido]Formatar texto para Numero antes de exportar para excel Empty Re: [Resolvido]Formatar texto para Numero antes de exportar para excel

    Mensagem  Convidado 18/10/2013, 14:07

    Obrigado e Desculpe a demora JPaulo !

    Na consulta eu ja formato os campos da seguinte forma.

    Format(Round(100-((Int(Sum(Qry_Relatorio_Parcial.Minutos_DiaAnt))/(1440*Qtde))*100),2),'Standard') AS ConsD,


    Depois faço um consulta União e esse consulta é que vai ser importada.


    Obrigado !
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11026
    Registrado : 04/11/2009

    [Resolvido]Formatar texto para Numero antes de exportar para excel Empty Re: [Resolvido]Formatar texto para Numero antes de exportar para excel

    Mensagem  JPaulo 18/10/2013, 16:13

    Ola;

    Então antes de mais faça o teste enviando tudo para o Excel, usando o Select * à consulta união;

    strSQL = "Select * From Qry_RelatorioDiario"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Formatar texto para Numero antes de exportar para excel Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Formatar texto para Numero antes de exportar para excel Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Formatar texto para Numero antes de exportar para excel Folder_announce_new Instruções SQL como utilizar...
    avatar
    Convidado
    Convidado


    [Resolvido]Formatar texto para Numero antes de exportar para excel Empty Re: [Resolvido]Formatar texto para Numero antes de exportar para excel

    Mensagem  Convidado 18/10/2013, 17:01

    Ja tentei tambem, mas fica no excel como texto do mesmo jeito!

    avatar
    Convidado
    Convidado


    [Resolvido]Formatar texto para Numero antes de exportar para excel Empty Re: [Resolvido]Formatar texto para Numero antes de exportar para excel

    Mensagem  Convidado 19/10/2013, 20:22

    Boa Tarde !


    Resolvi com uma sugestão do JPaulo no tópico abaixo
    http://maximoaccess.forumeiros.com/t13298-resolvidoconverter-texto-em-numero


    Obrigado !

    Conteúdo patrocinado


    [Resolvido]Formatar texto para Numero antes de exportar para excel Empty Re: [Resolvido]Formatar texto para Numero antes de exportar para excel

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 12:44