Seleccion de rango

[juliosolis]

Hola a todos, aqui voy de nuevo dando lata, bueno mi problema es el siguiente:
Que codigo puedo utilizar para que desde la celda A1 se desplace hacia bajo hasta encontrar la ultima celda con...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[ioyama]

Hola juliosolis

Dos posibles opciones

Sub Busca1()
uf = Range("A65536").End(xlUp).Row
Rows(uf & ":" & uf).Select
End Sub

Sub Busca2()
uf = Columns("A:A").Find(What:="Total").Row...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[sailepaty]

Otra opción,

Sub BuscaUltimaFila()
    Cells(Rows.Count, "A").End(xlUp).Resize(, 7).Select
End Sub

Saludos

 

[juliosolis]

Gracias mis amigos las dos repuestas satisfacen mi duda y me ayudaron.

 

[juliosolis]

hola sailepaty una pregunta abusando, me puedes interpretar el codigo la verdad no entiemdo lo siguiente:

Cells(Rows.Count, "A").End(xlUp).Resize(, 8).Select

 

[juliosolis]

Lo siento hubo un error lo que noe netiendo es:

Rows.Count,