oter protection de la feuille Résolu

Question

Bonjour, 
J ai un problème j ai fait un fichier exel et j ai protéger certaine cellule.
Quand j enlève la protection de la feuille  et que j enregistre puis je ferme mon fichier.
Mais chaque fois que je l ouvre la protection est chaque fois mise, je n arrive pas a l enlever cette protection.
quel qu un aurais t il une idée.
merci pour votre aide
Josiane



Configuration: Windows XP / Firefox 16.0

hubertaaz · Answer

Bonjour,

Ouvre ton fichier => sélectionne "Enregistrer sous", tu le nommes différemment.
Ensuite essaye la manoeuvre avec le nouveau fichier.

Cordialement

Mike-31 · Answer

Salut,

es ce que tu dois donner un mot de passe à l'ouverture ?

as tu des macros sur ce fichier ?

josi98710 · Answer

bonjour,j ai ouvert mon fichier et je l ai renommé différemment, sa fonctionne mais quand j active les macros sa ne va plus.
le mot de passe est      open
merci
Josiane

Mike-31 · Answer

Re,

Garde ton fichier d'origine, et c'est bien ce qui me semblais, il doit y avoir un code à l'ouverture ou à la fermeture voire pendant l'exécution d'un code qui rétabli la protection.

Il faudrait voir l'ensemble de tes codes ou mieux ton fichier sans note confidentielle que tu peux joindre à partir de ce lien

https://www.cjoint.com/

josi98710 · Answer

OK je te l envoie, mais mon fichier est très important.
Je n arrive pas a l envoyer

Mike-31 · Answer

Re, 



tu copies (pour en avoir deux) ton fichier dans un autre répertoire et tu supprimes des lignes de chaque onglet afin de l'alléger au max
et tu essayes de l'envoyer sinon 
quel est ton fournisseur d'accès
 
A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

josi98710 · Answer

OK je supprime des lignes
et j essaie

https://www.cjoint.com/?3ExnUrLinQF 

ouf je te l envoie

et encore merci

josiane

Mike-31 · Answer

Re,

C'est bien ça à l'ouverture tu as un code qui protège toutes tes feuilles, que veux tu faire supprimer cette protection ?

josi98710 · Answer

oui j aimerai supprimer la protection

Mike-31 · Answer

Re,

Alors clic droit sur un onglet de feuille ou clic sur Alt et touche F11

tu remarqueras dans la marge de gauche l'explorateur de projet et dans la liste Thisworkbook 
 double clic dessus
tu auras accès au code qu'il contient place simplement une apostrophe devant les quatre lignes comme ci dessous

Option Explicit
 Private Sub Workbook_Open()
    Dim i As Variant
    Dim nombre As Integer
    nombre = ActiveWorkbook.Sheets.Count
    Application.ScreenUpdating = False

   ' For i = 1 To nombre
   ' Worksheets(i).EnableOutlining = True
   ' Worksheets(i).Protect Password:="open", userInterfaceOnly:=True
   ' Next i

    Application.ScreenUpdating = True
 End Sub


ensuite soit tu déprotèges chaque feuille manuellement ou on t'écrit un code pour le faire en un clic

foo · Answer

Bonjour

deja dans la macro Private Sub Workbook_Open changer une ligne

 Private Sub Workbook_Open()
    Dim i As Variant
    Dim nombre As Integer
    nombre = ActiveWorkbook.Sheets.Count
    Application.ScreenUpdating = False
    For i = 1 To nombre
    Worksheets(i).EnableOutlining = True
    Worksheets(i).Unprotect Password:="open"
    Next i
    Application.ScreenUpdating = True
 End Sub

A+
Maurice

josi98710 · Answer

OK sa fonctionne
tu es génial
un très grand Merci
A+
Josiane

Mike-31 · Answer

Re,

D'ailleurs cette macro, tu peux la virer tout simplement ou mettre une apostrophe devant chaque ligne ce qui à pour but de la neutraliser

Oter protection de la feuille

13 réponses

Votre réponse

Discussions similaires

Newsletters