Direccion de celda

mueve la seleccion a la celda de abajo
range("a2").select
do
' haces algo
'
'
' terminas de hacer
selection.offset(1,0).select
loop until selection.value=""

"Llen" escribió en el mensaje
news:007101c39f1a$61453f00$
HOla

Estoy guardando la dirección de una celda de la siguiente
forma:
referencias = Selection.Address
despues ejecuto unas instrucciones, al final de ellas
quiero que la dirección se aumente en uno para que
continue el ciclo , por ejemplo la primera dirección que
tengo es $A$2 quisiera ahora cambia a $A$3 y asi
sucesivamente hasta completar un ciclo
como puedo aumentar la dirección????

Otra manera q tienes similar a la q propone Manuel seria
range("A2").activate
do while activecell.offset(0,0).value=""
senetencias
activecell.offset(1,0).activate
end while
es lo mismo pero jugando con activecell en vez de selection


"Manuel Romero" <mromerop.arroba.quita.esto.hotmail.com> escribió en el
mensaje news:#

mueve la seleccion a la celda de abajo
range("a2").select
do
' haces algo
'
'
' terminas de hacer
selection.offset(1,0).select
loop until selection.value=""

"Llen" escribió en el mensaje
news:007101c39f1a$61453f00$
HOla

Estoy guardando la dirección de una celda de la siguiente
forma:
referencias = Selection.Address
despues ejecuto unas instrucciones, al final de ellas
quiero que la dirección se aumente en uno para que
continue el ciclo , por ejemplo la primera dirección que
tengo es $A$2 quisiera ahora cambia a $A$3 y asi
sucesivamente hasta completar un ciclo
como puedo aumentar la dirección????