Bonsoir,
Comment déverrouiller une feuille pour pouvoir faire agir une macro, et
reverrouiller ensuite ?
--
Amicalement
Leo
----------------------------------------------------------
Pour les Riders, BMX, VTT, un seul site
LITTLE BIG TRAIL
http://perso.wanadoo.fr/lbt/
----------------------------------------------------------
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour Giorgi,
Dans le ThisWorkbook de ton classeur, tu copies ce qui suit en modifiant le nom de la feuille de la procédure selon ton application.
Cette procédure s'exécute à l'ouverture du classeur. Par la suite, tu peux faire fonctionner toutes les macros que tu désires et tu n'as pas à te soucier du fait que la feuille est protégée ou non..
Private Sub Workbook_Open() With Worksheets("feuil1") .Protect True, True, True, True End With End Sub
Avec l'utilisation d'un mot de passe "toto", la procédure devient :
Private Sub Workbook_Open() With Worksheets("feuil1") .Protect "toto", True, True, True, True End With End Sub
Salutations!
"giorgi.leonello" a écrit dans le message de news:416d7f44$0$7217$ Bonsoir, Comment déverrouiller une feuille pour pouvoir faire agir une macro, et reverrouiller ensuite ?
--
Amicalement Leo ---------------------------------------------------------- Pour les Riders, BMX, VTT, un seul site LITTLE BIG TRAIL http://perso.wanadoo.fr/lbt/ ----------------------------------------------------------
Bonjour Giorgi,
Dans le ThisWorkbook de ton classeur, tu copies ce qui suit en modifiant le nom de la feuille de la procédure selon ton
application.
Cette procédure s'exécute à l'ouverture du classeur. Par la suite, tu peux faire fonctionner toutes les macros que tu désires
et tu n'as pas à te soucier du fait que la feuille est protégée ou non..
Private Sub Workbook_Open()
With Worksheets("feuil1")
.Protect True, True, True, True
End With
End Sub
Avec l'utilisation d'un mot de passe "toto", la procédure devient :
Private Sub Workbook_Open()
With Worksheets("feuil1")
.Protect "toto", True, True, True, True
End With
End Sub
Salutations!
"giorgi.leonello" <giorgi.leonello@wanadoo.fr> a écrit dans le message de news:416d7f44$0$7217$8fcfb975@news.wanadoo.fr...
Bonsoir,
Comment déverrouiller une feuille pour pouvoir faire agir une macro, et
reverrouiller ensuite ?
--
Amicalement
Leo
----------------------------------------------------------
Pour les Riders, BMX, VTT, un seul site
LITTLE BIG TRAIL
http://perso.wanadoo.fr/lbt/
----------------------------------------------------------
Dans le ThisWorkbook de ton classeur, tu copies ce qui suit en modifiant le nom de la feuille de la procédure selon ton application.
Cette procédure s'exécute à l'ouverture du classeur. Par la suite, tu peux faire fonctionner toutes les macros que tu désires et tu n'as pas à te soucier du fait que la feuille est protégée ou non..
Private Sub Workbook_Open() With Worksheets("feuil1") .Protect True, True, True, True End With End Sub
Avec l'utilisation d'un mot de passe "toto", la procédure devient :
Private Sub Workbook_Open() With Worksheets("feuil1") .Protect "toto", True, True, True, True End With End Sub
Salutations!
"giorgi.leonello" a écrit dans le message de news:416d7f44$0$7217$ Bonsoir, Comment déverrouiller une feuille pour pouvoir faire agir une macro, et reverrouiller ensuite ?
--
Amicalement Leo ---------------------------------------------------------- Pour les Riders, BMX, VTT, un seul site LITTLE BIG TRAIL http://perso.wanadoo.fr/lbt/ ----------------------------------------------------------
Leo
Bonsoir, Merci pour cette réponse claire.
Comme d'habitude sur MPFE d'ailleurs. --
Amicalement Leo ---------------------------------------------------------- Pour les Riders, BMX, VTT, un seul site LITTLE BIG TRAIL http://perso.wanadoo.fr/lbt/ ----------------------------------------------------------
"michdenis" a écrit dans le message de news: #
Bonjour Giorgi,
Dans le ThisWorkbook de ton classeur, tu copies ce qui suit en modifiant le nom de la feuille de la procédure selon ton
application.
Cette procédure s'exécute à l'ouverture du classeur. Par la suite, tu peux faire fonctionner toutes les macros que tu désires
et tu n'as pas à te soucier du fait que la feuille est protégée ou non..
Private Sub Workbook_Open() With Worksheets("feuil1") .Protect True, True, True, True End With End Sub
Avec l'utilisation d'un mot de passe "toto", la procédure devient :
Private Sub Workbook_Open() With Worksheets("feuil1") .Protect "toto", True, True, True, True End With End Sub
Salutations!
"giorgi.leonello" a écrit dans le message de news:416d7f44$0$7217$
Bonsoir, Comment déverrouiller une feuille pour pouvoir faire agir une macro, et reverrouiller ensuite ?
--
Amicalement Leo ---------------------------------------------------------- Pour les Riders, BMX, VTT, un seul site LITTLE BIG TRAIL http://perso.wanadoo.fr/lbt/ ----------------------------------------------------------
Bonsoir,
Merci pour cette réponse claire.
Comme d'habitude sur MPFE d'ailleurs.
--
Amicalement
Leo
----------------------------------------------------------
Pour les Riders, BMX, VTT, un seul site
LITTLE BIG TRAIL
http://perso.wanadoo.fr/lbt/
----------------------------------------------------------
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
#J6XtrVsEHA.2556@tk2msftngp13.phx.gbl...
Bonjour Giorgi,
Dans le ThisWorkbook de ton classeur, tu copies ce qui suit en modifiant
le nom de la feuille de la procédure selon ton
application.
Cette procédure s'exécute à l'ouverture du classeur. Par la suite, tu peux
faire fonctionner toutes les macros que tu désires
et tu n'as pas à te soucier du fait que la feuille est protégée ou non..
Private Sub Workbook_Open()
With Worksheets("feuil1")
.Protect True, True, True, True
End With
End Sub
Avec l'utilisation d'un mot de passe "toto", la procédure devient :
Private Sub Workbook_Open()
With Worksheets("feuil1")
.Protect "toto", True, True, True, True
End With
End Sub
Salutations!
"giorgi.leonello" <giorgi.leonello@wanadoo.fr> a écrit dans le message de
news:416d7f44$0$7217$8fcfb975@news.wanadoo.fr...
Bonsoir,
Comment déverrouiller une feuille pour pouvoir faire agir une macro, et
reverrouiller ensuite ?
--
Amicalement
Leo
----------------------------------------------------------
Pour les Riders, BMX, VTT, un seul site
LITTLE BIG TRAIL
http://perso.wanadoo.fr/lbt/
----------------------------------------------------------
Amicalement Leo ---------------------------------------------------------- Pour les Riders, BMX, VTT, un seul site LITTLE BIG TRAIL http://perso.wanadoo.fr/lbt/ ----------------------------------------------------------
"michdenis" a écrit dans le message de news: #
Bonjour Giorgi,
Dans le ThisWorkbook de ton classeur, tu copies ce qui suit en modifiant le nom de la feuille de la procédure selon ton
application.
Cette procédure s'exécute à l'ouverture du classeur. Par la suite, tu peux faire fonctionner toutes les macros que tu désires
et tu n'as pas à te soucier du fait que la feuille est protégée ou non..
Private Sub Workbook_Open() With Worksheets("feuil1") .Protect True, True, True, True End With End Sub
Avec l'utilisation d'un mot de passe "toto", la procédure devient :
Private Sub Workbook_Open() With Worksheets("feuil1") .Protect "toto", True, True, True, True End With End Sub
Salutations!
"giorgi.leonello" a écrit dans le message de news:416d7f44$0$7217$
Bonsoir, Comment déverrouiller une feuille pour pouvoir faire agir une macro, et reverrouiller ensuite ?
--
Amicalement Leo ---------------------------------------------------------- Pour les Riders, BMX, VTT, un seul site LITTLE BIG TRAIL http://perso.wanadoo.fr/lbt/ ----------------------------------------------------------
