Notifications
Clear all

Executar Macro Automaticamente.

6 Posts
4 Usuários
0 Reactions
1,649 Visualizações
(@sergiodelp)
Posts: 9
Active Member
Topic starter
 

Bom dia.
Necessito criar uma macro sempre que o valor de uma célula for diferente de 0 (zero) aparece uma mensagem informando que a pagamento para hoje.

Como não tenho muito conhecimento em VBA gostaria da ajuda de vocês.

Fico no aguardo.
Abç.

 
Postado : 25/07/2016 9:05 am
engeel2014
(@engeel2014)
Posts: 207
Estimable Member
 

Amigo, posta a sua planilha, assim criamos a macro já dentro da planilha. Explique em que célula quer que o valor seja verificado.

Lucélio Ferreira dos Santos
Eng. Eletricista
CREA: DF-7165/TD
[email protected]

 
Postado : 25/07/2016 10:12 am
(@sergiodelp)
Posts: 9
Active Member
Topic starter
 

Segue a planilha de modelo.
O que eu preciso é que a macro com uma msg seja exibida caso a célula C12 for diferente de 0 (zero).

Na planilha a célula C10 é onde eu coloco a data para que seja procurado o montante de contas a pagar para aquele dia.

Espero que eu tenha conseguido me explicar.

Abç.

Sergio

 
Postado : 25/07/2016 1:33 pm
(@vbajr10)
Posts: 34
Eminent Member
 

Vê se lhe antende.

 
Postado : 25/07/2016 4:25 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Nem vi o exemplo do colega vbajr10 mas ve se ajuda

Em Esta Pasta de Trabalho


Private Sub Workbook_Open()

If Sheets("Plan1").Range("C12").Value <> 0 Then

MsgBox "Atenção Existem Pagamentos Para Realizar Nesta Data", vbInformation, "Atenção - Verifique Pagamentos"

End If

End Sub

Troque Plan1 pelo nome da planilha que vc precisa que a verificação seja realizada.

Este Codigo vai funcionar Qdo Abrir o Arquivo

Se quiser que funcione diferente troque o evento

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 25/07/2016 4:50 pm
(@sergiodelp)
Posts: 9
Active Member
Topic starter
 

Valew.....
Abraço...

 
Postado : 26/07/2016 6:59 am