Página 1 de 1

Estrutura If

Enviado: 10 Out 2019 às 13:49
por perdidoexcel
Boa tarde, não sei mexer com Vba e estou fazendo um trabalho pra faculdade.
Eu quero que o usuário digite um valor na A1 por exemplo e através de um if comparar se esse valor existe em uma determinada coluna, se não existir retorna erro, então eu fiz assim mais sei que está errado:
Linha = 4
If Cells(Linha, 2) = "F(22:32)" Then
MsgBox (" Ok. ")
Else
MsgBox (" Valor incorreto, digite um numero valido e Clique em Começar.")
End If

Alguém pode me ajudar?

Re: Estrutura If

Enviado: 10 Out 2019 às 14:53
por LeoHenrique
Boa tarde !

Pelo que precisa, acredito que não há necessidade de um código, veja se a fórmula na planilha em anexo te atende !

Att,

Leandro Moreira

Re: Estrutura If

Enviado: 10 Out 2019 às 14:59
por babdallas
Veja se ajuda
Código: Selecionar todos
Option Explicit
Option Private Module

Public Sub ProcurarValor()
    With wshTeste
        If Application.WorksheetFunction.CountIf(.Range("F6:F20"), .Range("A1")) > 0 Then
            VBA.MsgBox "OK"
        Else
            VBA.MsgBox "Valor incorreto! Digite um numero válido na célula A1 e clique no botão Começar."
        End If
    End With
End Sub