Boas,
Estava a tentar fazer uma macro que utilizasse DoCmd.SendObject para enviar o registo actual por e-mail através do Access em anexo. Isso eu já consegui.
No entanto necessitava de chegar mais longe e precisava que no assunto, além de um texto pré-formatado seguisse automaticamente o n.º do ID constante no campo da tabela, referente ao registo aberto.
É possível em VBA?
[resolvido] Envio registo atual em PDF por e-mail e valor preenchido automaticamente no assunto do e-mail
Moderador: Avelino Sampaio
-
- Mensagens: 5
- Registrado em: 12 Fev 2018, 15:02
- Avelino Sampaio
- Mensagens: 1895
- Registrado em: 04 Jun 2015, 18:27
- Contato:
Re: Envio registo atual em PDF por e-mail e valor preenchido automaticamente no assunto do e-mail
Afraimundo,
é possível em VBA. Algo assim em um botão do formulário:
Aguardamos
é possível em VBA. Algo assim em um botão do formulário:
Código:
Dim strPara$
Dim strAssunto$
Dim strMensagem$
strPara = "fulano@teste.com.br'
strAssunto = "Copia do contrato " & me!ID
strMensagem = "Olá" & vbnewLine & "Segue anexo copia do contrato de número " & me!ID"
Docmd.SendObject acSendQuery ,"qryTeste", acFormatPdf, strPara, , , strAssunto, strMensagem
Aguardamos
==================================================
Clique no link abaixo e veja um ótimo kit de ensino que tenho para você.
http://www.usandoaccess.com.br
==================================================
Clique no link abaixo e veja um ótimo kit de ensino que tenho para você.
http://www.usandoaccess.com.br
==================================================
-
- Mensagens: 5
- Registrado em: 12 Fev 2018, 15:02
Re: Envio registo atual em PDF por e-mail e valor preenchido automaticamente no assunto do e-mail
Avelino,
Desde já obrigado pela ajuda
Já consegui adaptar o código e funciona, mas se eu fechar a janela do outlook sem enviar, gera o seguinte erro, é possível contornar isso? Envio erros em anexo
Desde já obrigado pela ajuda
Já consegui adaptar o código e funciona, mas se eu fechar a janela do outlook sem enviar, gera o seguinte erro, é possível contornar isso? Envio erros em anexo
Você não está autorizado a ver ou baixar esse anexo.
-
- Mensagens: 5
- Registrado em: 12 Fev 2018, 15:02
Re: Envio registo atual em PDF por e-mail e valor preenchido automaticamente no assunto do e-mail
Já consegui,
Agora só queria dar uma linha de intervalo no paragrafo entre a primeira e a segunda linha.
Agora só queria dar uma linha de intervalo no paragrafo entre a primeira e a segunda linha.
- Avelino Sampaio
- Mensagens: 1895
- Registrado em: 04 Jun 2015, 18:27
- Contato:
Re: Envio registo atual em PDF por e-mail e valor preenchido automaticamente no assunto do e-mail
afraimundo,
o vbnewline pula de linha
...strMensagem = "Olá" & vbNewLine & vbNewLine & "Segue anexo copia do contrato de número 1020"
Aguardamos
o vbnewline pula de linha
...strMensagem = "Olá" & vbNewLine & vbNewLine & "Segue anexo copia do contrato de número 1020"
Aguardamos
==================================================
Clique no link abaixo e veja um ótimo kit de ensino que tenho para você.
http://www.usandoaccess.com.br
==================================================
Clique no link abaixo e veja um ótimo kit de ensino que tenho para você.
http://www.usandoaccess.com.br
==================================================
Quem está online
Usuários neste fórum: Nenhum usuário registrado e 2 visitantes