Abrir el libro siempre en una hoja predefinida

Quiero lograr que mi libro se abra siempre en la misma hoja, y al mismo tiempo definir un area de trabajo para cada una de mis hojas ( son 5 en total), para que el resto del documento no quede visible.
Tengo un userform para el Login.

Les dejo lo que he intentando hasta el momento sin resultados,

Private Sub workbook_open()
Application.Visible = False
UFLOGIN.Show
Sheets(Indice).ScrollArea = "$A$1:$P$31"
Sheets(Solicitar).ScrollArea = "$A$1:$l$1499"
Sheets(Comprobante).ScrollArea = "$A$1:$P$57"
Sheets(Remitir).ScrollArea = "$A$1:$l$1499"
Sheets(Ordinario).ScrollArea = "$A$1:$P$57"
End Sub

1 Respuesta

Respuesta
1

H o l a : Tienes que poner el nombre de la hoja entre comillas, por ejemplo:

Sheets("Indice").ScrollArea = "$A$1:$P$31"

Para seleccionar una hoja, puede ser así:

Sheets("Indice").Select

Podría quedar así:

Private Sub workbook_open()
    Application.Visible = False
    UFLOGIN.Show
    Sheets("Indice").ScrollArea = "$A$1:$P$31"
    Sheets("Solicitar").ScrollArea = "$A$1:$l$1499"
    Sheets("Comprobante").ScrollArea = "$A$1:$P$57"
    Sheets("Remitir").ScrollArea = "$A$1:$l$1499"
    Sheets("Ordinario").ScrollArea = "$A$1:$P$57"
    Sheets("Indice").Select
End Sub

Para ocultar el libro, también puedes hacerlo así:

Application.Windows(ThisWorkbook.Name).Visible = False

De esa forma solamente ocultas el libro con el que estás trabajando y puedes utilizar otros libros.

'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas