Como modifico la programación de mi libro

Para Dante Amor,

Estoy trabajando en un libro el cual tiene un Userform1 que captura datos en una hoja del mismo libro. Mi idea es que ese libro se mantenga oculto mientras se ejecuta el formulario para que los usuarios no puedan modificar nada, y solo se enfoquen a capturar lo que se les pide en el formulario. Pero si tienen otros libros abiertos puedan trabajar con ellos sin que afecte que tengan abierto el formulario. Ya he probado algunos códigos que ocultan el libro y que me permiten trabajar con los demás libros abiertos pero creo que algo estoy haciendo algo mal porque me manda error en una macro que pega una imagen en la hoja, imagino que es porque la hoja esta oculta pero no se como corregir...

El error que manda es (error 9 "subíndice fuera de intervalo")

Mi código que manda error en el Usefrorm1 es el siguiente:

Private Sub CommandButton5_Click()
fichero = Application.GetOpenFilename
If fichero = False Then Exit Sub
tope = Range("A5").Top
izq = Range("A5").Left
alto = Range("A5").Height
ancho = Range("A5").Width
Worksheets("Hoja3").Pictures.Insert(fichero).Select
w = Selection.Width
h = Selection.Height
MsgBox "La imagen se guardo correctamente"
End Sub

Y el codigo que utilizo para ocultar el libro es este:

Private Sub Workbook_Open()
    Application.Windows(ThisWorkbook.Name).Visible = False
    ThisWorkbook.Activate
    UserForm2.Show
End Sub