Hola,
Prueba con la siguiente instrucci�n
range("A1").End(xlDown).Offset(1).Select
Un saludo,
Juan
te podría sugerir tres posibles formas, cada una con sus pro y sus contras,
para que elijas la que mejor funcione en tu caso:
1.
Range("A1").End(xlDown).Offset(1,0).Select
Es el método que estás intentado implementar. Observa que lo que te hacía
falta, era utilizar el método Offset.
Este comando puede fallar si en la columna A tienes alguna celda en blanco
dentro de tu listado.
2.
Range("B" & rows.Count).End(xlUp).Offset(1,0).Select
Si tienes una columna en la que nunca vas a dejar celdas en blanco
(supongamos la columna B), podrías utilizar esta instrucción. Aquí el
desplazamiento se hace al revés: desde la última fila de la hoja hasta la
primera no vacía en esa columna, luego el método Offset hace el
desplazamiento hacia la siguiente.
3.
Cells(Range("A1").currentregion.Rows.count,1).offset(1,0).select
Si no puedes asegurar que no habrán celdas vacías en ninguna de tus
columnas, esta última opción selecciona tu lista como una región, cuenta el
número de filas y se desplaza hasta la siguiente de la última encontrada.
Aquí estoy suponiendo que tu listado principia en la celda A1. Si, por
ejemplo, tu listado principiara en la celda B8, la instucción sería:
Cells(Range("A1").currentregion.Rows.count+7,1).offset(1,0).select
No olvides comentar los resultados, saludos...
- - - - - -
"Macros Excel. Posicionar el cursor" escribió:
Wallyrios