<> "rr*"

[bEbEr]

Galera...

Como faço pra identificar dentro de um If se a célula é diferente de "RR*"?

Tenho várias células.. Abaixo segue o que tem nelas:

0100123

0100455

RR0002

RR0004

Eu queria que aquelas que começassem com RR substituisse por 0.

valeuuu

[Graymalkin]

Você pode usar a função InStr() ou o operador Like. Exemplo com o operador Like:

Dim célula As Range
Dim células As Range
    
Set células = Range("A1:A10")
    
For Each célula In células
    If célula.Value Like "RR*" Then
        célula.Value = 0
    End If
Next

Certo? ;)

Graymalkin