Quero fazer um For com Intervalo So que estou em duvida como vou fazer com o intervalo a1 ate a10 Exemplo sendo que o meu laco tem que ir de 1 ate 10 so que Preciso testar os valores que eu passei dentro das celulas Function posicao(inicial, final) Dim qtde Dim I inicial = 1 While inicial < final If (inicial = 1) Or (final = 1) Then qtde = qtde + 1 End If Wend End Function :ph34r: