Celdas seleccionadas

lo encontré Selection.Cells, gracias!

Hola a todos, no encuentro la función que me regresa el
rango seleccionado, necesito hacer un FOR EACH para

todas

las celdas seleccionadas, ejemplo:

For each celda in (aqui no se que poner)
Msgbox(celda)
Next celda


gracias a todos de antemano
.

Alex V wrote:

Hola a todos, no encuentro la función que me regresa el
rango seleccionado, necesito hacer un FOR EACH para todas
las celdas seleccionadas, ejemplo:

For each celda in (aqui no se que poner)
Msgbox(celda)
Next celda

La misma propiedad Selection del objeto Application, devuelve un objeto
Range cuando existe alguna selección, en caso contrario devuelve Nothing

Creo que lo que quieres es:

dim Celda
For Each Celda In Selection.Cells
msgbox Celda
Next

Saludos

Muchas gracias OECII

Alex V wrote:

Hola a todos, no encuentro la función que me regresa

el

rango seleccionado, necesito hacer un FOR EACH para

todas

las celdas seleccionadas, ejemplo:

For each celda in (aqui no se que poner)
Msgbox(celda)
Next celda

La misma propiedad Selection del objeto Application,

devuelve un objeto

Range cuando existe alguna selección, en caso contrario

devuelve Nothing

Creo que lo que quieres es:

dim Celda
For Each Celda In Selection.Cells
msgbox Celda
Next

Saludos

.