MaximoAccess

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

Obrigado

Administração do MaximoAccess

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]Como enviar todos os registros de um subformulario do access para o word

    avatar
    obedebatista
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 28/11/2012

    [Resolvido]Como enviar todos os registros de um subformulario do access para o word Empty [Resolvido]Como enviar todos os registros de um subformulario do access para o word

    Mensagem  obedebatista em 23/2/2014, 20:38

    Boa tarde mestres do forum, estou criando um sistema em access para uma escola de supletivo para cadastrar as notas dos exames e gerar o certificado de conclusão, mas tenho que enviar para o word, pois o certificado esta em um modelo do word onde o mesmo deve conter o historico do aluno.

    Usei o seguinte codigo para exportar para o word

    .ActiveDocument.Bookmarks("mat1").Select
    .Selection.Text = Trim(CStr(Forms!frm_Alunos!sub_Materias.Form!Materia))
    .ActiveDocument.Bookmarks("data1").Select
    .Selection.Text = Trim(CStr(Forms!frm_Alunos!sub_Materias.Form!data))
    .ActiveDocument.Bookmarks("escola1").Select
    .Selection.Text = (CStr(Forms!frm_Alunos!sub_Materias!Escola))
    .ActiveDocument.Bookmarks("nota1").Select
    .Selection.Text = (CStr(Forms!frm_Alunos!sub_Materias!Nota))
    .ActiveDocument.Bookmarks("mat2").Select
    .Selection.Text = (CStr(Forms!frm_Alunos!sub_Materias!Materia))

    o que acontece é que só envia os dados da primeira linha do subformulario e não envia o resto

    Como posso resolver este problema


    Última edição por obedebatista em 13/12/2016, 12:13, editado 1 vez(es)
    avatar
    obedebatista
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 103
    Registrado : 28/11/2012

    [Resolvido]Como enviar todos os registros de um subformulario do access para o word Empty Re: [Resolvido]Como enviar todos os registros de um subformulario do access para o word

    Mensagem  obedebatista em 25/2/2014, 18:42

    Ninguém pode me ajudar? desde ja agradeço.
    Leonardo Favale
    Leonardo Favale
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 05/04/2018

    [Resolvido]Como enviar todos os registros de um subformulario do access para o word Empty Re: [Resolvido]Como enviar todos os registros de um subformulario do access para o word

    Mensagem  Leonardo Favale em 28/5/2019, 14:39

    Estou com o mesmo problema alguém sabe como foi solucionado ???

    avatar
    renpv
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    [Resolvido]Como enviar todos os registros de um subformulario do access para o word Empty Re: [Resolvido]Como enviar todos os registros de um subformulario do access para o word

    Mensagem  renpv em 17/6/2019, 02:43

    Vai ter que criar um loop pra percorrer esses dados.
    Leonardo Favale
    Leonardo Favale
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 05/04/2018

    [Resolvido]Como enviar todos os registros de um subformulario do access para o word Empty Re: [Resolvido]Como enviar todos os registros de um subformulario do access para o word

    Mensagem  Leonardo Favale em 24/6/2019, 14:38

    Desculpe mas com base nesse exemplo como ficaria ? Pois não sei como fazer..
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2515
    Registrado : 22/11/2016

    [Resolvido]Como enviar todos os registros de um subformulario do access para o word Empty Re: [Resolvido]Como enviar todos os registros de um subformulario do access para o word

    Mensagem  DamascenoJr. em 24/6/2019, 16:00

    Buscando ajudar com o problema e principalmente com a evolução profissional dos colegas, deixo exemplo de como funcionam e se trabalha com recordsets

    youtube.com/watch?v=c8Mqfvtrs7s
    youtube.com/watch?v=pvxWXjAXhos


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2515
    Registrado : 22/11/2016

    [Resolvido]Como enviar todos os registros de um subformulario do access para o word Empty Re: [Resolvido]Como enviar todos os registros de um subformulario do access para o word

    Mensagem  DamascenoJr. em 24/6/2019, 16:03

    Também aqui tópico onde usuário usa recordsets para popular uma tabela no word
    https://www.maximoaccess.com/t35982-resolvidobookmark-error-13-empty


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Leonardo Favale
    Leonardo Favale
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 116
    Registrado : 05/04/2018

    [Resolvido]Como enviar todos os registros de um subformulario do access para o word Empty Re: [Resolvido]Como enviar todos os registros de um subformulario do access para o word

    Mensagem  Leonardo Favale em 25/6/2019, 20:10

    Obrigado, mas estou com problema em relação na junção ao Word e não consegui resolver com esses posts pela minha falta de conhecimento.
    Mas obrigado de qualquer forma.

      Data/hora atual: 18/1/2021, 10:31