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

XL 2016 RESOLU Identifiant et mot de passe pour ouvrir des onglets

A

arkheos

XLDnaute Nouveau
Bonjour,

Je souhaite créer un fichier avec plusieurs onglets, ce fichier est utilisé par plusieurs personnes avec des droits différents (1 Admin : accès à la totalité, 3 utilisateurs accès à certains onglets). Je souhaite que chacun possède un mot de passe différent et qu'il soit possible d'enregistrer leur accès dans un tableau.

J'ai trouver comment on peut faire avec des userform, mais je souhaite conserver la mise en page que je vous fourni dans le fichier joint.

A votre dispo pour tout compléments, merci de votre aide
 

Pièces jointes

  • Essai code d'entrée.xlsm
    20.4 KB · Affichages: 62
Trier par date Trier par votes

Jacky67

XLDnaute Barbatruc
arthour973 à dit:
.

Ton classeur ne me connait pas LOL et pourtant il affiche mon prénom à l'ouverture en tant qu'utilisateur.
C'est magique ?
Cliquez pour agrandir...
Re...
C'est parce que j'ai une boule de Crystal
Va voir dans le ThisWorkbook. Il y a des instructions à l'ouverture du classeur
Celle qui t'espionne est
.[i12] = Application.UserName
Edit:
Il y a une erreur de disposition dans mon code, sans incidence, mais erreur tout de même
Rectification
Code: 
Private Sub Workbook_Open()
Dim Sh As Worksheet
For Each Sh In ThisWorkbook.Worksheets
If Sh.Name <> "Accueil" Then Sh.Visible = False
Next
With Sheets("Accueil")
.[i15] = ""
.[i12] = Application.UserName
End With
End Sub
 
Dernière édition:
Vote positif 0 Vote négatif
A

arkheos

XLDnaute Nouveau
Bonjour,

j'ai crié victoire un peu tôt ...

lorsque je rajoute une page et que je donne l'accès en précisant la cellule D de "MDP", rien ne se passe ?

faut il rajouter une ligne de code pour que cela fonctionne ?

Bien cordialement
 
Vote positif 0 Vote négatif

Jacky67

XLDnaute Barbatruc
arkheos à dit:
Bonjour,

j'ai crié victoire un peu tôt ...

lorsque je rajoute une page et que je donne l'accès en précisant la cellule D de "MDP", rien ne se passe ?

faut il rajouter une ligne de code pour que cela fonctionne ?

Bien cordialement
Cliquez pour agrandir...
RE...
Pour être clair sur le fonctionnement
A l'ouverture du classeur seul la feuille "Accueil" est visible
L'utilisateur entre un nom d'utilisateur et un mot de passe
Les feuilles qui sont inscrites dans la ligne de l'utilisateur seront visibles si le MDP est correct

Les feuilles doivent exister.
Si tu souhaites un autre type de fonctionnement il faut le préciser.
Testes le classeur en PJ et dis ce qui ne fonctionne pas
*Edit
Je rajoute une version(v2) qui permet de changer d'utilisateur sans fermer le classeur
**RE Edit:
J'ai cru que c'était Ce lien n'existe plus qui avait des problèmes
Arkheos est-ce que le problème est résolu ?
 

Pièces jointes

  • arthour.xlsm
    30.8 KB · Affichages: 40
  • arthour v2.xlsm
    31.9 KB · Affichages: 40
Dernière édition:
Vote positif 0 Vote négatif
A

arkheos

XLDnaute Nouveau
Bonsoir jacky67,

super ! merci pour le fichier, je galérai à essayer de faire en sorte que ça fonctionne.

Si tu peux faire en sorte que la case identifiant n'affiche rien à l'ouverture ce serait parfait ( mon nom s'affiche dès l'ouverture du fichier)
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

M
  • Question
XL 2021 Protection des onglets
Réponses
2
Affichages
187
MANU64360
M
N
  • Question
XL 2021 Partage de fichier avec mot de passe
Réponses
6
Affichages
608
nike780
N
C
  • Question
Microsoft 365 Créer un synthèse de plusieurs onglets
Réponses
7
Affichages
422
cdric78
C
T
  • Question
Microsoft 365 Besoin d'aide pour transférer des cellules sous plusieurs conditions
Réponses
5
Affichages
464
fanfan38
Z
  • Question
Microsoft 365 Segment commun avec plusieurs onglets source de données
Réponses
12
Affichages
555
Zazagally
Z
T
  • Question
Microsoft 365 Cacher / détailler certaines colonnes dans certains onglets avec mot de passe
Réponses
6
Affichages
639
ThierryP
T
C
  • Question
XL 2016 Automatiser et synthétiser les informations d'un tableau Excel d'un onglet 1 vers des onglets 2 et 3
Réponses
14
Affichages
284
chris63
C
B
  • Question
Microsoft 365 compiler onglets excel avec VBA
Réponses
6
Affichages
607
Boubie
B
Q
  • Question
XL 2019 vba pour effacer résultat cellules de plusieurs fichiers a partir d'un fichier distant
Réponses
6
Affichages
192
Phil69970
N
  • Résolu(e)
Microsoft 365 Mot de passe pour activation macro
Réponses
4
Affichages
378
Nathan027
N
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…