Connexion à l’application
Le code VBA exécuté à l’ouverture du classeur StockShowRoom.xlsm est situé dans la procédure Workbook_Open du module ThisWorkbook.
Private Sub Workbook_Open()
' Personnalisation de l'affichage Excel
Application.DisplayFormulaBar = False
' Formulaire de connexion
Frm_Identification.Show
End Sub
Ce code permet de masquer la barre de formule et d’afficher le formulaire Frm_Identification ci-dessous :
1. Présentation du formulaire Frm_Identification Formulaire
Ce formulaire permet :
-
de contrôler le login et le mot de passe saisis à partir de la plage de cellules nommée TAB_LOGIN qui contient la liste des utilisateurs ;
-
de récupérer son profil utilisateur et de masquer et verrouiller certaines cellules en fonction du profil utilisateur.
2. Liste des contrôles du formulaire Frm_Identification
N° |
Nom du contrôle |
Description |
1. |
txtLogin |
Zone de texte |
2. |
txtPassword |
Zone de texte : la propriété PasswordChar doit avoir la valeur * pour remplacer les caractères saisis par une * |
3. |
BtOK |
Bouton de commande |
4. |
BtAnnuler |
Bouton de commande |
3. Code du formulaire Frm_Identification
Option Explicit
Private Sub btAnnuler_Click()
' Bouton Annuler : ferme le classeur
ThisWorkbook.Close False
Unload Me
End Sub
...