Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Mettre Password sur image lien

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

steph34

XLDnaute Junior
Bonsoir le forum

j'ai un classeur "Sommaire" dans lequel j'ai créé différents boutons images avec des liens qui renvoi vers un d'autres classeurs.

Sur certains de ces boutons je voudrai mettre un Mot de passe;

d'après ce que j'ai pu lire sur le forum ca passe par un userform mais peut on le faire aussi avec une bouton lien? et comment?
j'ai essayé d'adapter des codes que j'ai trouvé mais sans succès.
Je joint un petit fichier dont les liens renvoi vers des feuilles (mais ça ne change rien)

merci de votre aide
 

Pièces jointes

Re : Mettre Password sur image lien

Bonsoir

Un fichier xlsx ne peut contenir de macros.
Donc les différents codes que tu as essayés ne seront pas préservés.

Il faut enregistrer ton fichier en *.xls (ou xlsm) mais de préférence ici en *.xls.
 
Re : Mettre Password sur image lien

Re
Je sais pas si il faut une macro ou pas pour un mot de passe. Je cherche des solutions.
C'est pour cela que je viens sur ce forum.
Mais pour faire bien je renvoi le fichier avec la bonne extension.
 

Pièces jointes

Re : Mettre Password sur image lien

Re

Essayes de t'inspirer de ceci
Code:
Sub Rognerunrectangleavecuncoi_QuandClic()
' Rognerunrectangleavecuncoi_QuandClic Macro
' Macro enregistrée le 20/12/2011 par l'agrafe
Dim MDP
MDP = InputBox("Saisir le mot de passe")
If MDP = "steph34" Then
    Sheets("Feuil2").Activate
Else
MsgBox "mot de passe faux"
Exit Sub
End If
End Sub

(au préalable, il faut supprimer le lien hypertexte sur cette forme automatique, pour que la macro fonctionne)
 
Re : Mettre Password sur image lien

Bonjour le forum

En m'inspirant de ce que j'ai trouvé j'ai un code qui fonctionne pour ouvrir les feuilles du classeur.

Code:
Sub mdp()
'
' Mot de passe Macro

'
    Dim sPass As String
    sPass = InputBox("Veuillez saisir le mot de passe")
    If sPass = "toto" Then
        Sheets("Feuil2").Activate
       Else
MsgBox "Le mot de passe n'est pas valide"
Exit Sub
    End If
End Sub

comment spécifier le chemin pour ouvrir un classeur qui se trouve dans un autre dossier?

merci de votre aide
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
297
L
Réponses
1
Affichages
1 K
L
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…