Comment exécuter une macro sur une feuille verrouillé?

clavervba -  
clavervba Messages postés 47 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

comment exécuter une macro sur une feuille protégée?
lorsque je verrouille ma feuille et que j'essaye d’exécuter ma macro elle met erreur.

s'il vous plait, donner moi des explications avec des précisions.

A voir également:

2 réponses

Réponse 1 / 2
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Bonjour,

Avant de poser une question, une petite recherche s'impose :
http://www.google.fr/...

te donne :
https://forums.commentcamarche.net/forum/affich-3164421-excel-execut-macros-sur-feuille-protegee
0
Réponse 2 / 2
clavervba Messages postés 47 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

je l'ai fait, mais il ne marche pas.
enfaîte il verrouille bien la feuille, mais n’exécute pas la macro il a toujours le message erreur.
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Alors montre nous ici le code que tu as écrit.
0
clavervba Messages postés 47 Date d'inscription   Statut Membre Dernière intervention   > pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention  
 
voici le lien ci-dessous:
https://www.cjoint.com/c/GBqlFpXSlTN
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761 > clavervba Messages postés 47 Date d'inscription   Statut Membre Dernière intervention  
 
Je me répète :
montre nous ici le code que tu as écrit
Un simple copié/collé de ton code nous suffit pour l'instant.
Si besoin de ton classeur, on te le demandera.
0
clavervba Messages postés 47 Date d'inscription   Statut Membre Dernière intervention   > pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention  
 
Sub MacroavecfeuilleProtect()

ActiveSheet.Unprotect "12345"
ActiveSheet.Protect "12345", True

End Sub

il verrouille la feuille, mais ne permet pas d’exécuter la macro.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713 > clavervba Messages postés 47 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour tout le monde,

clavervba:
'sur que ca ca ne doit pas marcher! 
Private Sub Workbook_Open()

With Worksheets("rourse")
Protect "1234"
DrawingObjects = True
contents = True
Scenarios = True
UserInterfaceOnly = True

End With
End Sub


'------------------------------------------------------------------------

'code protection pour ecriture par VBA sans deproteger 
Private Sub Workbook_Open()
    With Worksheets("rourse")
        .Protect Password:="1234", DrawingObjects:=True, contents:=True, Scenarios:=True, UserInterfaceOnly:=True
        .EnableSelection = xlNoSelection        'pas de selection cellule
    End With
End Sub


Ensuite, il faut enlever tous les protect et unprotec des autres codes
0

Discussions similaires

Feuille de score belote
nulleeninfo -
brucine -

7 réponses