Comment protéger un document et y ajouter une petite page

naugus -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour, j'ai un document que je veux protéger sur excel mais j'aimerai également ajouter une petite fenêtre qui affiche <<n modifie pas c document stp>> comment faire svp merci d'avance



3 réponses

Réponse 1 / 3
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

En vba il possible de protéger toutes les feuilles d'un classeur.
Faire Alt F11 pour accéder à l'éditeur. Ensuite cliquer sur ThisWorkbook en haut à gauche et mettre ce code: 

Option Explicit
Private Sub Workbook_Open()
parcourir
End Sub
Sub parcourir()
Dim feuille As Worksheet
For Each feuille In ActiveWorkbook.Sheets
   Worksheets(feuille.Index).Protect Password:="azerty", UserInterfaceOnly:=True
 Next
 MsgBox "Les feuilles de ce classeur sont protégées"
End Sub


Il faut que les macros soit activées.
Cliquer sur Développeur dans le ruban. Sécurité des macros. Paramètres des macros. Cocher Activer toutes les macros
0
naugus
 
Bonjour merci. mais je ne trouve pas le ruban ou je vais voir développeur. la feuille est néanmoins protégé mais elle n'affiche pas mon message quand j'essaye de la modifier
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Si ta feuille est protégé avec la macro, c'est que cela fonctionne. Mais le message s'affiche uniquement à l'ouverture du classeur. Le message que tu as, est le message d'Excel te disant que la feuille est protégée. Si tu veux autre chose, il faut nous en dire plus.
0
naugus
 
excel 2010. c k je veux c k quand on clique par exemple dans une cellule le message <<naugus a interdit de modifier ce classeur>> s'affiche
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Je ne comprends pas ton approche. Quand la feuille est protégée, tu as ce message d'Excel. Si tu veux avoir un message personnalisé mettre ceci dans la feuille concernée: 

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox "naugus a interdit de modifier ce classeur"
End Sub
0
Réponse 2 / 3
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Bonjour,

Dans la protection il y a beaucoup à faire, outre la protection des feuilles, tu peux également protéger le fichier à l'ouverture par mot de passe, ajouter une protection à la modification toujours avec mot de passe mais tu peux également protéger tes feuilles et ajouter une possibilité pour accéder à certaines cellules protégées moyennant mot de passe.
reste à approfondir ta demande
0
Réponse 3 / 3
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Re,

Quelle version Excel as tu !
0

Discussions similaires

openoffice writer - insérer une page
mokette -
crcrlucario -

24 réponses