formulario envio emails

Bom dia Amigos! Um problema ,ao marcar a caixa de seleção o form seleciona todos os emails do sub ,dai o problema é o seguinte :eu tenho mais de 500 emails no form ,dai o cliente de email só abre ,apos eu clicar ok em todos os emails ,da pra resolver isso sem que eu precise clicar em ok pra enviar os emails.
obs ,a caixa de dialogo do cleinte de email ,me pergunta seu eu quero enviar um por um ,logo é muito complicado ,pois para cada email da lista ele me pergunta se quero enviar como na imagem em anexo.
Daria pra colocar um função dentro do cod ,para abrir o outlook ,sem esta caixa de dialogo!
1-a caixa de seleção marca todos os id ,porem porem gostaria que ela nao marcasse o campo email se este estiver nulo
isso é possivel ?
Eis o cod


Private Sub MarcarTodos_AfterUpdate()
'Se marcar ele marca todos os campos na tabela...
'se nao quiser assim, coloque uma condição Where no final do codigo
If Me.MarcarTodos = -1 Then
CurrentDb.Execute " UPDATE tblCliente SET [Selecionado] = -1"
Else
CurrentDb.Execute " UPDATE tblCliente SET [Selecionado] = 0"
End If
'Atualiza o Formulario
SendKeys ("{F5}")
End Sub

Kadhu

Para facilitar a ajuda por todos,  poste um arquivo com objetos envolvidos.

Abraços,

Eis o modelo ,ao clicar o botao enviar do form ,ele abre um caixa de dialogo perguntamdo ?(ok)
Gostaria que ao invés de abrir essa caixa de dialog ,o ofrm ja mandasse todos os emails seleciolados e abrisse o cliente de email automaticamante ,pois eu tenho uma lista muito grande e nao da pra ficar clicando em ok mais de 500 vezes ,nao sei se entenderam ,mas essa é minha dor .obrigado
acredito ser um comando dentro deste cod ,porém nao manjo !

up !!!boa tarde senhores

Ainda não baixei seu exemplo, estou fora de casa.

Mas gosto de trabalhar com cx de listagem, para fins de seleção ou exclusão.

Assim que olhar, dou retorno.

Abraço,

Ricardo,


      Ainda não pude testar por questões de configurações de servidor em local de trabalho.

     Como mencionei na mensagem anterior, este exemplo do grande mestre JR trabalha com caixa de listagens, no caso duas, bem prático.

     Vale a pena dar uma olhada.


Abraços,

obrigado querido vou dar uma olhada e ver se se encaixa no minha pretenção!
É isso mesmo depois de todos os emails selecionados ,clicar enviar e o cliente de email ,abrir com todos os destinatarios dentro do campo email,Vou tentar adaptar ao meu modelo ok,

Boa noite Senhores !visto que o meu bd ,é muito grande e tem muitos elementos envolvidos ,como macros e modulos
,para eu adaptar os exemplo acima no meu ,eu terei que add as macros e os modulos para a função de enviar emails funcionar ?pois a função que eu queria era exatamente assim do exemplo porem ha muitos elementos envolvidos ,minha duvida é essa !se nao ha veria um cod  apenas pra se colocado no botão enviar e ,que obedecesse ao comando de enviar emails ,a abrisse o cliente de emails automaticamente depois de os emails selecionados !obrigado

olá cleverson_manaus, pegando um gancho no tópico, como faço para adicionar "remetente em copia", teria como colocar ?
Utilizo um código de envio de e-mail, porem ao abrir o Outlook ele não incluir a assinatura do e-mail, e o seu código já inclui. Porem necessito de alguns emails em copia.

Muito bom este exemplo, valeu.

Querido o certo seria um novo tópico,se não confunde a organização do post!

Bom dia Senhores ,dando um up !não consegui resolver ainda

UP!Boa noite Senhores

Bom dia Senhores up!

bom dia senhores,nao consegui ainda ,vista que meu app(bd) ,tem muitos modulos envolvidos,logo meu medo esta ai .obrigado