macro pour mot de passe pour ouvrir un classeur composé de plusierurs onglets

[DIGGERJACK]

Bonsoir

Me revoici sur le site après quelques mois d'absences (voire années peut être)

Le site a bien changé mais a su gardé son essence première et j'en suis ravi

Je reviens donc vers vous pour une macro qui propose la saisie d'un mot de passe dès l'ouverture du classeur ( classeur qui va comprendre plusieurs onglets). La macro doit fonctionner sur excel version 2003, 2007 et 2010

Est ce quelqu'un a une piste sur le sujet

Merci d'avance et bonne soirée

 

[CBernardT]

Re : macro pour mot de passe pour ouvrir un classeur composé de plusierurs onglets

Bonsoir DIGGERJACK et le forum,


Une solution :


Private Sub Workbook_Open()
Dim MDP As String, Mot As String
' Création du mot de passe
MDP = "***"
' Message pour la saisie du numéro de passe
'Mot = InputBox("Entrer le mot de passe, merci", "Saisie mot de passe")
'If Mot <> MDP Or Mot = "" Then
'MsgBox "Mot de passe erroné, le classeur va être refermé !"
'ThisWorkbook.Close
'End If
End Sub

Macro à placer dans le module Thisworkbook

 

[JCGL]

Re : macro pour mot de passe pour ouvrir un classeur composé de plusierurs onglets

Bonjour à tous,

Pourquoi ne pas utiliser la possibilité native :

• Enregistrer Sous
• Options Générales
• MdP pour l'ouverture

A + à tous

 

[DIGGERJACK]

Re : macro pour mot de passe pour ouvrir un classeur composé de plusierurs onglets

Bonsoir CBernardT et JCGL

Merci pour vos réponses à tous les deux.
Je pense adopter la seconde solution qui utilise les fonctions basiques d'excel et garde en stock la macro au cas où

Pour JCGL : nous avons la même passion votre frère et moi à savoir le chantournage

Bonne soirée à tous et merci

 

[JCGL]

Re : macro pour mot de passe pour ouvrir un classeur composé de plusierurs onglets

Bonjour à tous,
Salut Bernard,
Salut l'Excavateur...,

Il est toujours préférable d’utiliser les possibilités natives de l'application...
Mon frère en a fait son métier et ses sacs personnalisables font un malheur...

PS : David... C'est de la pub... Mais non concurrentielle... Arf et Niark...

A++
A + à tous