Página 1 de 1
CRIAR ALERTA DE ERRO AO ADICIONAR NUMERO INFERIOR AO ACTUAL
Enviado: 07 Fev 2019 às 08:41
por Kulld
Boa tarde pessoal.
Eu estou fazendo uma planilha de controle de kilometragens de veiculos para controle de revisão dos mesmos.
A ajuda que eu preciso é seguinte:
Eu vou introduzindo a Km actual na coluna H diariamente e como a Kilometragem deve ser crescente eu quero que se introduzido a kilometragem ou numero inferior a algum numero na coluna H ele dé erro e mostre uma menssagem de alerta por exemplo ( KILOMENTRAGEM INFERIOR A ANTERIOR )
Tentei fazer com a formatação condicional mas fiquei limitado.
Este processo deve ser reversivel se por acaso eu quiser zerar uma celula por motivo da substituição do odometro por exemplo.
Saudações.
CRIAR ALERTA DE ERRO AO ADICIONAR NUMERO INFERIOR AO ACTUAL
Enviado: 07 Fev 2019 às 09:17
por GroverL
Bom dia Kulld.
Você quer comparar o valor novo que você vai adicionar com a própria célula da coluna H?
A quantidade de valores vão ser apenas essas 3 linhas?
Pois pensei em criar uma macro, que ao clicar na célula ele te solicitaria a nova kilometragem e ai ele faria a comparação com o valor que já estava na célula.
Att.
Re: CRIAR ALERTA DE ERRO AO ADICIONAR NUMERO INFERIOR AO AC
Enviado: 07 Fev 2019 às 09:47
por Kulld
Bom dia GroverL.
Obrigado pela sua contribuição.
Sim eu quero comparar o valor novo com o valor que estará numa das celulas da coluna H que deve ser superior mas tenho que ter opção de zerar as celulas.
A quantidade de valores são para 30 linhas e quero para duas planilhas.
Cpts
Re: CRIAR ALERTA DE ERRO AO ADICIONAR NUMERO INFERIOR AO AC
Enviado: 07 Fev 2019 às 14:58
por Jimmy
Olá Kulld
Segue a planilha com macro implementada. Quando for digitado qualquer valor na coluna H, será verificado se há algum outro valor, nessa mesma coluna, que seja maior ou igual ao digitado.
Se houver, uma mensagem é dada, o valor digitado é apagado, e o cursor permanece na célula em questão.
Veja se te atende e dê retorno.
Jimmy San Juan
CRIAR ALERTA DE ERRO AO ADICIONAR NUMERO INFERIOR AO ACTUAL
Enviado: 08 Fev 2019 às 03:43
por Kulld
Hi Jimmy.
Fiz experiencias se vai de acordo com oque pretendo mas percebi que não esta exactamente ao oque pretendo.
Percebi que a menssagem faz relação com outras celulas mas na verdade oque pretendo é que a menssagem me alerte somente para o valor anterior da mesma celula e não pode apagar o ultimo valor assim que aparecer a menssagem.
E gostaria de saber como posso multiplicar a formular ou a linguagem para 31 celulas em linhas de cima para baixo.
Kulld
Re: CRIAR ALERTA DE ERRO AO ADICIONAR NUMERO INFERIOR AO AC
Enviado: 08 Fev 2019 às 11:48
por Jimmy
Olá,
Agora entendi melhor o que deseja.
Veja se a planilha anexa te atende.
A coluna auxiliar I guarda o valor anterior, uma vez que ao digitar algo na célula, o que havia nela desaparece.
Jimmy San Juan
Re: CRIAR ALERTA DE ERRO AO ADICIONAR NUMERO INFERIOR AO AC
Enviado: 08 Fev 2019 às 17:07
por osvaldomp
Instale o código abaixo no módulo da planilha, assim:
1. copie o código daqui
2. clique com o direito na guia da planilha de interesse e escolha '
Exibir Código'
3. cole o código na janela em branco que vai se abrir
4. feito! '
Alt+Q' para retornar para a planilha e testar
Código: Selecionar todosPrivate Sub Worksheet_Change(ByVal Target As Range)
Dim n As Long, v As Long
If Target.Count > 1 Then Exit Sub
If Target.Column <> 8 Or Target.Value = "" Then Exit Sub
On Error GoTo fim
n = Target.Value
Application.EnableEvents = False
Application.Undo
v = Target.Value
If n <= v Then
MsgBox "A QUILOMETRAGEM DEVE SER MAIOR DO QUE " & v
Target.Value = v
Else: Target.Value = n
End If
fim:
Application.EnableEvents = True
End Sub
Re: CRIAR ALERTA DE ERRO AO ADICIONAR NUMERO INFERIOR AO AC
Enviado: 09 Fev 2019 às 08:54
por Kulld
Hi Osvaldo
Muito obrigado funcionou.
Saudacoes
Kulld