Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
COMANDO DE ENVIAR E...
 
Notifications
Clear all

COMANDO DE ENVIAR E-MAIL AUTOMÁTICO PAROU DE FUNCIONAR

 
2024 - VBA & Macros
Post Recente por headway123 6 anos atrás
7 Posts
3 Usuários
0 Reactions
1,922 Visualizações
RSS
 headway123
(@headway123)
Posts: 7
Active Member
Topic starter
 

Olá a todos,

Preciso de um help novamente.

Minha função de enviar e-mail automático parou de funcionar.

Não sei o motivo, ela não executa o comando de acordo com as datas.

e ao clicar na variável iDias aparece uma data de 25/12/1899.

Até poucos dias atrás estava executando o comando.

Segue as imagens do que aparece.

https://uploaddeimagens.com.br/imagens/ ... c1dcf2c27c
https://uploaddeimagens.com.br/imagens/ ... 216281acd2

Se alguém souber o que pode ser ficarei grato.

Obrigado!

 
Postado : 27/09/2018 7:55 am
xlarruda
 xlarruda
(@xlarruda)
Posts: 732
Honorable Member
 

Como você declarou iDias?

as date?

Poderia postar sua planilha?

___________________________________________________________________________________________
Se a resposta atendeu sua dúvida, por favor, clique no Gostei e marque o Tópico como [Resolvido].

Att.

André Arruda

 
Postado : 27/09/2018 8:21 am
 headway123
(@headway123)
Posts: 7
Active Member
Topic starter
 

Sim, as Date

Sub Alerta()
    
    Dim iLin As Integer
    Dim iDias As Date
    With Plan4

        For iLin = 2 To .UsedRange.Rows.Count
        
        iDias = .Cells(iLin, 25).Value - VBA.Date()
 
Postado : 27/09/2018 8:27 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

headway123,

Bom dia!

Pedimos, por gentileza, utilizar a ferramenta CODE existente logo acima da caixa de mensagens (quinto botão da esquerda para a direita) ao postar códigos VBA.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 27/09/2018 8:32 am
 headway123
(@headway123)
Posts: 7
Active Member
Topic starter
 

Segue a planilha com o código e o erro.

O código está em modulo no VBA.

Obrigado!

 
Postado : 27/09/2018 7:19 pm
xlarruda
 xlarruda
(@xlarruda)
Posts: 732
Honorable Member
 

Vc declarou iDias as date
Repare que na coluna y, a célula y5 é texto e não date. Para comprovar isso transforme todos os dados da coluna y para o formato Geral e veja que todos viraram números inteiros menos y5.
Corrija isso reeditando o valor da célula.
Acredito que seja esse o problema....

Não consigo testar pois estou no celular. Abç!

___________________________________________________________________________________________
Se a resposta atendeu sua dúvida, por favor, clique no Gostei e marque o Tópico como [Resolvido].

Att.

André Arruda

 
Postado : 27/09/2018 7:40 pm
 headway123
(@headway123)
Posts: 7
Active Member
Topic starter
 

Sim, essa célula estava com o formato errado mesmo, não me dei conta, isso foi pq fiquei apagando e rescrevendo tentando fazer o código funcionar.
Mas não é esse o causador do problema, pois mesmo corrigindo, não está funcionando o comando de call do e-mail
pode testar que você verá.

 
Postado : 27/09/2018 7:55 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico