Saberexcel - site de quem precisa aprender Macros Microsoft Excel VBA

Essas macro e Função do Aplicativo Microsoft Excel VBA, verifica se o Projeto VBA está ou não protegido, e retorna uma mensagem, a senha da do Projeto VBA exemplo é: [ 1 ] , para acessar tecle [Alt + F11]

Sub retorna_projeto_protegido()
If ProtegidoVBProject(ActiveWorkbook) Then 'Exit Sub
   MsgBox ("Projeto VBA Workbook protegido")
Else
Exit Sub
End If
End Sub

Function ProtegidoVBProject(ByVal wb As Workbook) As Boolean

Dim SABER As Integer
SABER = -1
On Error Resume Next
SABER = wb.VBProject.vbComponents.Count
On Error GoTo 0

If SABER = -1 Then
    ProtegidoVBProject = True
Else
   ProtegidoVBProject = False
End If

End Function

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel



   Baixe o exemplo de planilha contendo a macro acima
vba vbe verifica se projeto vba esta ou nao protegido (49.37 kB)