[Vba] Protection Vba

[lito74]

Bonjour,
Je souhaite, en code vba, protéger ou déproteger la fenêtre vba. J'ai trouver comment la fermer

Code :

Application.VBE.MainWindow.Visible = False

, mais pas comment la protéger....

[J_Yohan]

je sais pas ce que t entend pas proteger deproteger mais pour une application tu peut convertir toute ta base en fichier mde afin de rendre le code vba invisible mais il faut penser a sauvegarder une base classique

bonne continuation

[lito74]

Je préfèrerais ne pas passer par une base mde..... Existe-t-il une autre solution ? Merci pour votre aide

[jean-paul lepetit]

Salut,

Tu peux passer par Outils/sécurité pour protéger tout ce que tu veux

[ft035580]

Salut,

Sur un bouton tu peux placer ce code:

Code :

1
2
3
4
Private Sub Proteger_Click()
    SendKeys "+{TAB}{RIGHT}%V{+}{TAB}" & "Ton Mot de Passe" & "{TAB}" & "Ton Mot de Passe" & "~"
    Application.VBE.CommandBars(1).FindControl(id:=2578, recursive:=True).Execute
End Sub

[lito74]

Bonjour,
Je reviens sur le sujet.....
Le code de ft035580

Code :

1
2
3
 
 
Private Sub Proteger_Click() SendKeys "+{TAB}{RIGHT}%V{+}{TAB}" & "Ton Mot de Passe" & "{TAB}" & "Ton Mot de Passe" & "~" Application.VBE.CommandBars(1).FindControl(id:=2578, recursive:=True).Execute End Sub

est pas mal , mais je souhaiterai allez un peu plus loin :
- décochage de "vérouillage du projet"
- fermeture de la fenêtre "propriété du projet"

Merci