VBA: Code d'acces fichier de gestion de données

Bonjour à toutes et à tous,

j'ai présentement un fichier excel qui me permet de gérer mon stock magasin, seulement je souhaite limiter le nombre d'utilisateur en attribuant des code d’accès (en passant par VBA) qui leur sera demandé à l'ouverture du fichier.

j'ai essayé avec inputbox mais sans solution.

Private Sub Workbook_Open()
Dim resultat As String
resultat = InputBox("texte " & Chr(10) & "veillez Entrer Le Code d'accès", "VELCOM ", "1234")
End Sub

D'avance je vous remercie .

Bonjour, Pourquoi ne pas simplement utiliser la fonction excel de protection par mot de passe à l'ouverture ?

Elle peut soit interdire l'ouverture du fichier si mot de passe erroné ou soit autoriser l'ouverture du fichier mais en lecture seul sans autoriser les modifications.

Votre mot de passe dans le Workbook "Open" c'est de la rigolade ; Aujourd'hui tout le monde sait qu'il suffit de maintenir la touche majuscule à l'ouverture

pour bloquer les macros... du coup votre fichier serait facilement accessible.

Bonjour

et merci pour la réponse