como posso fazer mascara de senha

Question

• COMO  FAZER MASCARA NA SENHA assim  como "******"

 olha o que eu fiz 

Dim resp As String

resp = InputBox("Digite a senha", "GpcSystem")

If resp = "gilliardpc" Then

If resp = "" Then Exit Sub

    Cells.Select

    Selection.EntireRow.Hidden = False

Sheets("MATERIAS EXECUTADOS ").Select

Else

MsgBox "Você não tem autorização "

fim:

MsgBox "Não Insista"

 

Exit Sub

End If

End Sub