Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 Msgbox com função SE + Auto Salvamento

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
AzonBR



Mensagens : 8
Data de inscrição : 20/10/2011

MensagemAssunto: Msgbox com função SE + Auto Salvamento   Qui Out 20, 2011 5:59 am

Ajuda ai pessoal..

Tenho uma planilha em excel que os dados é alterados constante, preciso de uma VBA que salva esses dados nesse mesma planilha.
não entendo muito de VBA, não sei se da pra fazer em uma gravação de macro, mas que essa grava seja auto executada de 1 em 1 minuto, se tiver como fazer isso... Eu ficarei muito agradecido.

minha outra duvida é Msgbox com função SE Exemplo.

Se a celula 2A for >9,0 Emitir uma Mensagem na tela avisando. Exemplo: celula 2A = 9,1 mensagem na tela "Alerta pH Alto".
Preciso de uma sequência de umas 20.

Caso alguem souber se tiver como enviar o alerta via e-mail ficarei muito grato tbm!

Ate Mais .. Aguardo respostas.....



Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: Msgbox com função SE + Auto Salvamento   Qui Out 20, 2011 5:55 pm

Boa tarde!!!

Qualquer dúvida poste sua planilha em site gratuito como 4Shered etc...

Para a sua 1º dúvida ...

Código:
Option Explicit
'Esse código deve ser posto na Pasta de Trabalho
Private Sub Workbook_Open()
    Application.OnTime Now + TimeValue("00:00:01"), "aqui o nome da sua planilha (guia)"
   
    End Sub


Option Explicit

Sub SalvarAutomatico()
'Esse código deve ser posto em um MODULO
Range("A1:B7").Select
    ActiveWorkbook.Worksheets("aqui o nome da sua planilha (guia)")
    ThisWorkbook.Save
    MsgBox "Atualizado" 
End Sub

Para a sua 2º dúvida ...
Código:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Range("A2") > 9 Then
  MsgBox "Alerta pH Alto"
  Else
  Exit Sub
  End If
End Sub


Att..
Voltar ao Topo Ir em baixo
Ver perfil do usuário
AzonBR



Mensagens : 8
Data de inscrição : 20/10/2011

MensagemAssunto: Re: Msgbox com função SE + Auto Salvamento   Sab Out 22, 2011 6:15 am

Ok, OBrigado pela resposta, mais não certo aqui. Ver se você consegue resolver esse aqui

http://profwillianexcel.forumeiros.com/t83-enviar-dados-para-o-e-mail-a-cada-atualizacao-excel-vba
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: Msgbox com função SE + Auto Salvamento   Sab Out 22, 2011 11:58 pm


Boa noite!!!

Poste sua planilha em site gratuito 4Shared



Att..
Voltar ao Topo Ir em baixo
Ver perfil do usuário
AzonBR



Mensagens : 8
Data de inscrição : 20/10/2011

MensagemAssunto: Re: Msgbox com função SE + Auto Salvamento   Dom Out 23, 2011 2:57 am

Ok, mais meu cadastro eé novo no site e só posso postar links apartir de 7 dias após ter feito o cadastro.
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: Msgbox com função SE + Auto Salvamento   Dom Out 23, 2011 3:01 am

...O Pessoal do fórum ficará no aguardo... alien
Voltar ao Topo Ir em baixo
Ver perfil do usuário
Conteúdo patrocinado




MensagemAssunto: Re: Msgbox com função SE + Auto Salvamento   Hoje à(s) 1:33 pm

Voltar ao Topo Ir em baixo
 
Msgbox com função SE + Auto Salvamento
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Função auto-bloqueio de tópicos
» [Tutorial] Adicionar "auto rotação" em aplicativos ou jogos em JAVA
» [java][auto rotate] Monty Python's Cow Tossing (estilo Angry Birds)
» Expressões matemáticas, funções e operadores
» [Engine] Auto-Tile

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: