Menú de selección de hojas; seleccionar la última hoja

En las entregas pasadas vimos cómo realizar un menú sencillo de selección de hojas mediante la aplicación del Objeto WorkSheets donde programamos dos botones para seleccionar cada una de las hojas que teníamos en el libro. En esta ocasión vamos a ver como seleccionar la última hoja del libro y esto tiene valor, cuando no se sabe cuál es el número de la hoja final o su nombre; es en este escenario donde toma valor el uso de la Propiedad Count:

Propiedad Count: Mediante el uso de esta Propiedad, podemos obtener el número de hojas que tenemos en el Libro de Excel:

En esta imagen, los nombres de las hojas son Control, Inventario, Facturas y las demás no se alcanzan a ver; mediante la aplicación de la Propiedad Count vamos a indicar a Visual basic que nos “lleve” hasta la última hoja. Para repasar un poco, en la entrega donde hicimos le menú de selección de hojas utilizamos la siguiente macro:

Sub SeleccionarHoja3()

Worksheets(3).Select

End Sub

En la Línea dos estamos utilizando el Objeto Worksheets donde indicamos entre paréntesis, un número que indica la posición en la que se encuentra la hoja que queremos seleccionar, en este caso, la Hoja3 se encuentra en la posición 3 dentro del Libro de Excel.

Para seleccionar la última hoja vamos al editor de Visual Basic, damos doble clic en la Hoja1 desde el explorador de Proyectos:

Y pegamos el siguiente código:

Sub SeleccionarUltimaHoja()

Worksheets(Worksheets.Count).Select

End Sub

Queda de la siguiente manera:

Veamos lo que significa cada código:

Linea 1, Sub SeleccionarUltimaHoja (): Indica el inicio de la macro

Linea 2, Worksheets(Worksheets.Count).Select: con esta instrucción estamos activando el Objeto Worksheets en el cual indicamos entre paréntesis no un número de hoja (Como en la aplicación de entregas pasadas de creación de menú), en lugar de ello estamos invocando de nuevo el Objeto Worksheets pero esta vez aplicando la Propiedad Count con la cual obtenemos la cantidad de Hojas que contiene el libro y dicho número corresponde también a la última hoja del libro

Linea 3, End Sub: indica el final de la macro

Probemos ejecutando esta macro con F5 y veremos que nos lleva a la última hoja del libro.

Descargar archivo.

MÁS SOBRE

Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.

Siéntase libre de opinar

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc., pero debe hacerlo sin insultar y sin ofender a otros.

Información legal aplicable para Colombia.