Classeur partagé avec autorisation d'acces

Re : Classeur partagé avec autorisation d'acces

Salut c'est re moi!!

Même question avec Pierre / Paul / Jacques qui aurait un acces sur la meme feuille mais sur des plages de cellules séparées et préalablement définies?

@+ et merci

Yochma23

Re : Classeur partagé avec autorisation d'acces

Toc toc?

Personne pour éclairer ma lanterne?

Re : Classeur partagé avec autorisation d'acces

Bonjour le forum
Bonjour yochma23

Quelques lignes de code pour te montrer une certaine façon. A toi de finir.

Private Sub Workbook_Open()
personneutilisatrice = Application.UserName 'personne utilisatrice excel
personneloguee = Environ("UserName") 'personne loguee
If personneloguee = "Administrateur" Then
Exit Sub
End If
Sheets("recap").Activate
Sheets("jacques").Protect password:="pierre"
Sheets("jacques").Protect password:="paul"
Sheets("jacques").Protect password:="jacques"
Sheets("pierre").Visible = False
Sheets("paul").Visible = False
Sheets("jacques").Visible = False

Select Case personneloguee 'prendre au choix : utilisatrice ou loguee
Case "pierre"
Sheets("pierre").Visible = True
Sheets("pierre").Activate
ActiveSheet.Unprotect password:="pierre"
Case "paul"
Sheets("paul").Visible = True
Sheets("paul").Activate
ActiveSheet.Unprotect password:="paul"
Case "jacques"
Sheets("jacques").Visible = True
Sheets("jacques").Activate
ActiveSheet.Unprotect password:="jacques"
Case "Administrateur"
Sheets("paul").Visible = True
Sheets("paul").Activate
ActiveSheet.Unprotect password:="paul"
End Select

End Sub

Il y a certainement plus court, mais comme cela tu comprends chaque ligne

A+

Re : Classeur partagé avec autorisation d'acces

Bonjour à tous,

J'ai été confronté au même souci d'usage privatif d'un classeur partagé.
Si ce n'est pas trop théorique, c'est efficace dans la pratique :


https://www.excel-downloads.com/threads/classeur-partage-et-usage-privatif.69952/


Bonne soirée
Kotov