Feuille et mot de passe
Résolu
eric2027
-
eric2027 -
eric2027 -
Bonjour,
j'ai une feuille ou j'ai mis un mot de passe dans certaines cellules et je voudrais que quand on clique dans ces cellules la demande du mot de passe n'apparaisse pas
est ce que cela est possible
Éric
j'ai une feuille ou j'ai mis un mot de passe dans certaines cellules et je voudrais que quand on clique dans ces cellules la demande du mot de passe n'apparaisse pas
est ce que cela est possible
Éric
A voir également:
- Feuille et mot de passe
- Trousseau mot de passe iphone - Guide
- Mot de passe - Guide
- Mot de passe administrateur - Guide
- Identifiant et mot de passe - Guide
- Mot de passe bios perdu - Guide
44 réponses
Bonjour,
Si tu as mis un mot de passe, tu as donc protégé ta feuille...
Lors de la protection, désactive l'option "Sélectionner les cellules verrouillées", ainsi tu ne pourras plus les sélectionner....(donc plus de message d'alerte)
Bonne journée
Si tu as mis un mot de passe, tu as donc protégé ta feuille...
Lors de la protection, désactive l'option "Sélectionner les cellules verrouillées", ainsi tu ne pourras plus les sélectionner....(donc plus de message d'alerte)
Bonne journée
re
j'ai fait comme tu m'as dis, cela fonctionne, sauf que si je n'enregistre pas ma feuille, et la réouvre, la case "Sélectionner les cellules verrouillées" se coche toute seule
bizarre non
Éric2027
j'ai fait comme tu m'as dis, cela fonctionne, sauf que si je n'enregistre pas ma feuille, et la réouvre, la case "Sélectionner les cellules verrouillées" se coche toute seule
bizarre non
Éric2027
Re-,
Je comprends :
"Lorsque tu fermes le classeur sans enregistrer"?
Bah, oui, c'est normal qu'il revienne à l'état initial....Comme tu n'as pas enregistré la modification, il ré-ouvre comme avant...
Protège comme je te l'ai dit, enregistre, et ensuite, tu peux continuer comme tu veux
bonne journée
Je comprends :
"Lorsque tu fermes le classeur sans enregistrer"?
Bah, oui, c'est normal qu'il revienne à l'état initial....Comme tu n'as pas enregistré la modification, il ré-ouvre comme avant...
Protège comme je te l'ai dit, enregistre, et ensuite, tu peux continuer comme tu veux
bonne journée
re
ben, c ce que j'ai fait, mais par exemple, je fais ce qu'il faut, c ok mais j'ai essayé de le faire sans enregistrer le doc parce que j'avais fait une erreur et là quand je ré-ouvre ma feuille et ben c'est revenu comme à la base
je comprends pas tout
ben, c ce que j'ai fait, mais par exemple, je fais ce qu'il faut, c ok mais j'ai essayé de le faire sans enregistrer le doc parce que j'avais fait une erreur et là quand je ré-ouvre ma feuille et ben c'est revenu comme à la base
je comprends pas tout
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Re-,
Ouvre ton classeur, Protège ta feuille, en enlevant l'option "Sélectionner les cellules verrouillées", Enregistre le classeur....
A partir de maintenant, tu peux faire ce que tu veux, comme il a été enregistré, il gardera en mémoire cette option (à moins que tu n'aies une macro à l'intérieur, ou que tu ne modifies toi-même cette option...)
bon courage
Ouvre ton classeur, Protège ta feuille, en enlevant l'option "Sélectionner les cellules verrouillées", Enregistre le classeur....
A partir de maintenant, tu peux faire ce que tu veux, comme il a été enregistré, il gardera en mémoire cette option (à moins que tu n'aies une macro à l'intérieur, ou que tu ne modifies toi-même cette option...)
bon courage
re
Dim Temps As Variant
Public Sub Clign()
'Programmation de l'évènement toutes les secondes
Temps = Now + TimeValue("00:00:01")
Application.OnTime Temps, "Clign"
If [B40] >= 11 Then
With ThisWorkbook
'Texte clignotant
With .ActiveSheet
.Shapes("Alerte").Visible = Not .Shapes("Alerte").Visible
End With
With .ActiveSheet.[B40]
[B40].Font.ColorIndex = IIf(.Font.ColorIndex = 2, 1, 2)
[B40].Font.FontStyle = "Gras"
[B40].Font.Size = 12
End With
'Fond clignotant
With .ActiveSheet.[B40]
.Interior.ColorIndex = IIf(.Interior.ColorIndex = 1, 2, 1)
End With
End With
End If
End Sub
Public Sub StopClign()
On Error Resume Next
'Stoppe la gestion de l'évènement OnTime
Application.OnTime Temps, "Clign", , False
On Error GoTo 0
'Cache l'alerte
With ThisWorkbook
'Fond
.ActiveSheet.[B40].Interior.ColorIndex = xlNone
'Texte
.ActiveSheet.[B40].Font.ColorIndex = 0
[B40].Font.FontStyle = "Normal"
[B40].Font.Size = 10
End With
ActiveSheet.Shapes("Alerte").Visible = False
End Sub
Sub Protection_Cellule_Couleur()
Dim cel As Range
ActiveSheet.Unprotect Password:="leg503"
For Each cel In [B9:B39,C9:C39,D9:D39,E9:E39,F9:F39,G9:G39,h9:h39]
If cel.Interior.ColorIndex = 38 Then
cel.Locked = True
End If
Next
ActiveSheet.Protect Password:="leg503", DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True
End Sub
Dim Temps As Variant
Public Sub Clign()
'Programmation de l'évènement toutes les secondes
Temps = Now + TimeValue("00:00:01")
Application.OnTime Temps, "Clign"
If [B40] >= 11 Then
With ThisWorkbook
'Texte clignotant
With .ActiveSheet
.Shapes("Alerte").Visible = Not .Shapes("Alerte").Visible
End With
With .ActiveSheet.[B40]
[B40].Font.ColorIndex = IIf(.Font.ColorIndex = 2, 1, 2)
[B40].Font.FontStyle = "Gras"
[B40].Font.Size = 12
End With
'Fond clignotant
With .ActiveSheet.[B40]
.Interior.ColorIndex = IIf(.Interior.ColorIndex = 1, 2, 1)
End With
End With
End If
End Sub
Public Sub StopClign()
On Error Resume Next
'Stoppe la gestion de l'évènement OnTime
Application.OnTime Temps, "Clign", , False
On Error GoTo 0
'Cache l'alerte
With ThisWorkbook
'Fond
.ActiveSheet.[B40].Interior.ColorIndex = xlNone
'Texte
.ActiveSheet.[B40].Font.ColorIndex = 0
[B40].Font.FontStyle = "Normal"
[B40].Font.Size = 10
End With
ActiveSheet.Shapes("Alerte").Visible = False
End Sub
Sub Protection_Cellule_Couleur()
Dim cel As Range
ActiveSheet.Unprotect Password:="leg503"
For Each cel In [B9:B39,C9:C39,D9:D39,E9:E39,F9:F39,G9:G39,h9:h39]
If cel.Interior.ColorIndex = 38 Then
cel.Locked = True
End If
Next
ActiveSheet.Protect Password:="leg503", DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True
End Sub
Re-,
Rajoute cette ligne en toute fin de la procédure "Protection_Cellule_Couleur", juste avant le End Sub :
bon courage
Rajoute cette ligne en toute fin de la procédure "Protection_Cellule_Couleur", juste avant le End Sub :
ActiveSheet.EnableSelection = xlUnlockedCells
bon courage
re
c ok sauf quand on revient sur la feuille et que l'on clique sur la cellule, il me demande le mot de passe
c ok sauf quand on revient sur la feuille et que l'on clique sur la cellule, il me demande le mot de passe
Re-,
Euh, dans ton code, tu ne verrouilles que les cellules de couleur 38 (soit de couleur mauve), donc si tu as bien déroulé ton code, ces cellules sont verrouillées, et tu ne peux plus les sélectionner...
Euh, dans ton code, tu ne verrouilles que les cellules de couleur 38 (soit de couleur mauve), donc si tu as bien déroulé ton code, ces cellules sont verrouillées, et tu ne peux plus les sélectionner...
re
je suis d'accord, mais quand tu enregistre la feuille et que l'on revient dessus la cellule 38 mauve, là, il me demande le mot de passe,
si c'est possible, n'existe t-il pas un morceau de code pour que ce message ne revienne pas
je suis d'accord, mais quand tu enregistre la feuille et que l'on revient dessus la cellule 38 mauve, là, il me demande le mot de passe,
si c'est possible, n'existe t-il pas un morceau de code pour que ce message ne revienne pas
Re,
Peux-tu joindre ton fichier, sans données confidentielles (tu effaces même toutes les données), mais en gardant tous les codes?
Pour joindre ton fichier, utilise le site :
Peux-tu joindre ton fichier, sans données confidentielles (tu effaces même toutes les données), mais en gardant tous les codes?
Pour joindre ton fichier, utilise le site :
http://www.cijoint.fr/</code>
Re-,
J'aurai préféré le fichier excel, plutôt qu'un fichier Word....
Pour ainsi, essayer de reproduire ce qui se passe...
J'ai essayé le code, et si la feuille est protégée, je ne peux pas sélectionner les cellules verrouillées....
Je ne comprends plus, là....
J'aurai préféré le fichier excel, plutôt qu'un fichier Word....
Pour ainsi, essayer de reproduire ce qui se passe...
J'ai essayé le code, et si la feuille est protégée, je ne peux pas sélectionner les cellules verrouillées....
Je ne comprends plus, là....
re
je te renvois le doc exel sur cjoint, le mot de passe est "leg503" pour les codes c le même mot de passe pour la macro
https://www.cjoint.com/?0lcpBLoTY8s
je te renvois le doc exel sur cjoint, le mot de passe est "leg503" pour les codes c le même mot de passe pour la macro
https://www.cjoint.com/?0lcpBLoTY8s
Salut,
C'est bien le fichier sur lequel j'ai écris le code VBA !!!
quelles sont ces cellules et que veux tu faire exactement !
C'est bien le fichier sur lequel j'ai écris le code VBA !!!
quelles sont ces cellules et que veux tu faire exactement !
re-,
tout d'abord, quand tu ouvres ton fichier, arrête la sub :
Pour ce faire, tu cliques n'importe où dans la procédure, tu appuies sur F8 (le titre se met en jaune, tu es en mode pas-à-pas)
Puis appuie sur F5, pour dérouler le code...
ensuite, déroule ton code de protection (de la même façon)
Tu verras, ensuite, tu ne pourras plus sélectionner les cellules "mauves"
tout d'abord, quand tu ouvres ton fichier, arrête la sub :
Public Sub Clign()
Pour ce faire, tu cliques n'importe où dans la procédure, tu appuies sur F8 (le titre se met en jaune, tu es en mode pas-à-pas)
Puis appuie sur F5, pour dérouler le code...
ensuite, déroule ton code de protection (de la même façon)
Tu verras, ensuite, tu ne pourras plus sélectionner les cellules "mauves"
Salut Cousinhub,
Pour t'expliquer le code, les cellules se mettent en mauve et se vérrouillent après deux saises dans la cellule et la cellule B40 déclenche un shape clignotante au dessus d'une certaine valeur.
Je n'ai pas lu toutes les explications de la discussion, mais je ne vois pas de cellules protégées avec un mot de passe à moins que les cellules mauve une fois vérrouillées ne doivent pas afficher la boites de dialogue avertissant de la protection, si c'est cela une demi ligne à rajouter dans la ligne protection
Pour t'expliquer le code, les cellules se mettent en mauve et se vérrouillent après deux saises dans la cellule et la cellule B40 déclenche un shape clignotante au dessus d'une certaine valeur.
Je n'ai pas lu toutes les explications de la discussion, mais je ne vois pas de cellules protégées avec un mot de passe à moins que les cellules mauve une fois vérrouillées ne doivent pas afficher la boites de dialogue avertissant de la protection, si c'est cela une demi ligne à rajouter dans la ligne protection