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


2 participantes

    [Resolvido]Access para word (Oficios_Old)

    alcides
    alcides
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 17/04/2011

    [Resolvido]Access para word (Oficios_Old) Empty Access para word (Oficios_Old)

    Mensagem  alcides 10/5/2011, 21:23

    Achei um exemplo postado pelo JPaulo com o titulo acima.
    Estou tentando adaptar para eu fazer um "controle de Oficios"
    Tá dando mais ou menos certo, mas não consigo enviar para o Word o formato de data que está em minha tabela e form.
    na tabela e form está: 10 de Maio de 2011.
    para o word é enviado: 10/5/2011.
    como posso fazer para enviar a data conforme está na tabela e form.

    obrigado.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  criquio 10/5/2011, 21:25

    Olá Alcides, seja bem bem vindo ao forum. Seria interessante postar o código para a gente ver como a data está sendo enviada par ao Word.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    alcides
    alcides
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 17/04/2011

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  alcides 10/5/2011, 21:27

    Eu acabei não colocando o link do post com a resposta do JPaulo.

    Este é um exemplo de um usuario com a mesma duvida;
    http://dl.dropbox.com/u/771097/oficios_OLD.rar
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  criquio 10/5/2011, 21:40

    Tente formatar a linha que envia a data mais ou menos assim:

    .Selection.Text = (Format(Forms!Clientes!NomeEmitente1), dd" de "mmmm" de "yyyy)


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    alcides
    alcides
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 17/04/2011

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  alcides 10/5/2011, 21:49

    Criquio.
    está dando erro de compilação: era esperado: )
    e aponta para a virgula antes do dd.
    alcides
    alcides
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 17/04/2011

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  alcides 10/5/2011, 21:50

    coloquei assim:
    .Selection.Text = (Format(Forms!Clientes!DataOficio),dd" de "mmmm" de "yyyy)
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  criquio 10/5/2011, 22:07

    Vamos testar separando as partes da data para ver se dá certo:

    .Selection.Text = (Format(Forms!Clientes!DataOficio), "dd") & " de " & (Format(Forms!Clientes!DataOficio), "mmmm") & " de " & (Format(Forms!Clientes!DataOficio), "yyyy")


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    alcides
    alcides
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 17/04/2011

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  alcides 10/5/2011, 22:14

    É tá dificil.
    mesmo mensagem apontando para o mesmo local.

    será que meu ofício não vai poder ficar com um formato de data padrão de oficio.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  criquio 10/5/2011, 22:21

    São os parênteses. Veja assim:

    .Selection.Text = (Format(Forms!Clientes!DataOficio, "dd")) & " de " & (Format(Forms!Clientes!DataOficio, "mmmm")) & " de " & (Format(Forms!Clientes!DataOficio, "yyyy"))


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    alcides
    alcides
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 17/04/2011

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  alcides 10/5/2011, 22:39

    Essas coisas estão sempre nos detalhes.
    Teste funcionando. ok.
    Criquio, muito obrigado.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  criquio 10/5/2011, 23:23

    Obrigado pelo retorno. Só faltou clicar no botão Resolvido. Pode deixar que eu clico dessa vez.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    alcides
    alcides
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 17/04/2011

    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  alcides 11/5/2011, 00:53

    Ops. Desculpe.
    Procurei isto e não tinha achado.

    Conteúdo patrocinado


    [Resolvido]Access para word (Oficios_Old) Empty Re: [Resolvido]Access para word (Oficios_Old)

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 09:50