Este exemplo usa a coluna A inteira e não precisa programação VBA.

Obrigado pela ajuda hronconi,
O que estou precisando é um pouco diferente, vai precisar de VBA.

Somente a célula A1 vai atribuir um valor aleatório, e este valor será procurado na Coluna H, caso encontre o resultado, na célula ao lado (do valor encontrado), deverá marcar um x.
Todas as vezes que alterar a célula A1, ele faz este procedimento:
- Encontra o valor na coluna H
- Marca um X na célula I (ao lado do valor encontrado)

Eu pensei em ter um inputBox para atribuir um valor na A1.

Obrigado

Vê se lhe atende.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

    
    If Target.Address(False, False) = "A1" Then
    
            On Error Resume Next
            
                Dim Coluna  As Integer
                Dim Linha   As Long
                Dim TEXTO    As String
                
                Coluna = 8
                TEXTO = "MEU TEXTO"
                
                
                'se quiser limpar a coluna que é incluido o texto, só tirar a aspa simples do inicio do code abaixo
                'Sheets("Plan1").Columns(Coluna + 1).ClearContents
                
                
                Linha = Application.Match(Target.Value, Sheets("Plan1").Columns(8), 0)
            
            On Error GoTo 0
        
        
            If Linha <> 0 Then
            
                Plan1.Cells(Linha, Coluna + 1) = TEXTO
            
            End If
    
    End If

End Sub

Esta é a minha versão usando VBA.

Muito obrigado pela ajuda!

Resolvido.