Apertura de una hoja del libro con contraseña.

Desde la hoja de índice (6) de mi libro habilitado para macros, al hacer clic en un CommandButton determinado de ella ejecuto un código cuyo objetivo básico y primordial es que se visibilice la hoja de índice (7) del libro que estaba oculta.

Este es el código que utilizo:

Application.ScreenUpdating = False
Const miTit1 As String = "OCULTAR..."
Const miTit2 As String = "MOSTRAR..."
If Me.MOSTRAR_COTIZ_MODIF.Caption = miTit1 Then
        Me.MOSTRAR_COTIZ_MODIF.Caption = miTit2
        Sheets(7).Visible = False
        Me.MOSTRAR_COTIZ_MODIF.BackColor = RGB(255, 255, 179)
        Me.MOSTRAR_COTIZ_MODIF.ForeColor = vbBlack
    Else
        Me.MOSTRAR_COTIZ_MODIF.Caption = miTit1
        Sheets(7).Visible = True
        Sheets(7).Protect
        Me.MOSTRAR_COTIZ_MODIF.BackColor = RGB(219, 237, 244)
        Me.MOSTRAR_COTIZ_MODIF.ForeColor = vbRed
End If
Application.ScreenUpdating = True

 ¿Qué código debo intercalar para exigir que el usuario introduzca una contraseña determinada con el fin de que la hoja (7) se visibilice efectivamente?