Celula Está Contida No Range ?

[Guest Alexandre Marques]

Vê se alguém consegue entender a minha dificuldade.

no conjunto (10 ) , cinco está contido, logo:

10 <=== 5

Veja ... 1,2,3,4,5,6,7,8,9,10.

Mesma coisa no excel

No range("A1:A10"), "A5" está contido, logo:

range("A1:A10") <====="A5"

Veja... A1,A2,A3,A4,A5,A6,A7,A8,A9,A10.

Assim funciona...............................................................................

mas quando é muitas celulas demora muito.

For each VarCell in range("A1:A10")

If VarCell.address="A5" then

msgbox "Celula está no Range "

End if

next

Capitou ????

Grato :unsure:

[RenatoMejias]

Movendo para VBA.

[Graymalkin]

Se você colocar um Exit For dentro do If você vai poupar o trabalho de procurar nas demais células após o valor ser encontrado. Deve melhorar a performance (pelo menos depois do valor ser encontrado). Mas, são tantas células assim? Bom, talvez você também possa fazer uma busca binária.

Abraços,

Graymalkin