OVH Cloud OVH Cloud

Ouverture controlée

1 réponse
Avatar
Cyrille
Bonjour,
Je dispose d'un classeur Excel plac=E9 sur r=E9seau. Plusieurs=20
utilisateurs doivent acc=E9der =E0 ce classeur, mais pour des=20
raisons trop longues =E0 expliquer ici, je souhaiterais que=20
ce classeur ne soit ouvrable que par l'intermediaire d'un=20
autre classeur. En d'autres termes, si l'utilisateur=20
double clique sur le classeur en question un message (par=20
exemple) lui indique qu'il n'a pas le doit d'acceder au=20
classeur directement et qu'il doit passer par=20
l'interm=E9diare d'un autre classeur (et puis tant qu'on y=20
est tout permis : son ordi tombe en rideau, 2000 euros son=20
imm=E9diatement d=E9bit=E9s de sa paye, une photo de Massimo=20
Gargia s'imprime en 200 exemplaires,etc...)

Qqun a une id=E9e??

Merci d'avance
Cyrille

1 réponse

Avatar
Jacky
Bonjour Cyrille

Pour la 2eme partie:
Private Sub Workbook_Open()
MsgBox "Vous devez ouvrir ce fichier en passant par celui que votre
collègue donnera le nom." & Chr$(10) & "Si vous insistez; 2000 Euros seront
débités sur votre compte et seront virés sur le CCP 18745 J (celui de Jacky
évidement)"
Application.DisplayAlerts = False
ActiveWorkbook.Close
End Sub
Salutations
JJ


"Cyrille" a écrit dans le message de
news:37d301c4a55b$d576dbc0$
Bonjour,
Je dispose d'un classeur Excel placé sur réseau. Plusieurs
utilisateurs doivent accéder à ce classeur, mais pour des
raisons trop longues à expliquer ici, je souhaiterais que
ce classeur ne soit ouvrable que par l'intermediaire d'un
autre classeur. En d'autres termes, si l'utilisateur
double clique sur le classeur en question un message (par
exemple) lui indique qu'il n'a pas le doit d'acceder au
classeur directement et qu'il doit passer par
l'intermédiare d'un autre classeur (et puis tant qu'on y
est tout permis : son ordi tombe en rideau, 2000 euros son
immédiatement débités de sa paye, une photo de Massimo
Gargia s'imprime en 200 exemplaires,etc...)

Qqun a une idée??

Merci d'avance
Cyrille