J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver
le magnifique message qui apparait quand on essaie de modifier une
cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce
maudit message continue à apparaitre..
D'avance merci
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
anonymousA
bonjour,
ca ne se désactive pas.Si tu veux gérer autrement que par ce biais l'interdiction d'écrire sur des cellules données, gère le par l'evenement de feuille worksheet_selectionchange
A+
Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver le magnifique message qui apparait quand on essaie de modifier une cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce maudit message continue à apparaitre.. D'avance merci
@+ thierry :-))
bonjour,
ca ne se désactive pas.Si tu veux gérer autrement que par ce biais
l'interdiction d'écrire sur des cellules données, gère le par l'evenement de
feuille worksheet_selectionchange
A+
Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver
le magnifique message qui apparait quand on essaie de modifier une
cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce
maudit message continue à apparaitre..
D'avance merci
ca ne se désactive pas.Si tu veux gérer autrement que par ce biais l'interdiction d'écrire sur des cellules données, gère le par l'evenement de feuille worksheet_selectionchange
A+
Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver le magnifique message qui apparait quand on essaie de modifier une cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce maudit message continue à apparaitre.. D'avance merci
@+ thierry :-))
MichDenis
Bonjour Thierry,
C'est possible si au moins une cellule de la feuille a la propriété "Locked = False" ( format / cellule / onglet protection).
Dans mon exemple j'ai choisi la cellule A1,
'-------------------- With Worksheets("Feuil1") .Unprotect .Range("A1").Locked = False .Protect .EnableSelection = xlUnlockedCells End With '--------------------
Salutations!
"ThierryP" a écrit dans le message de news: Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver le magnifique message qui apparait quand on essaie de modifier une cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce maudit message continue à apparaitre.. D'avance merci
@+ thierry :-))
Bonjour Thierry,
C'est possible si au moins une cellule de la feuille a la propriété "Locked = False" ( format / cellule / onglet protection).
Dans mon exemple j'ai choisi la cellule A1,
'--------------------
With Worksheets("Feuil1")
.Unprotect
.Range("A1").Locked = False
.Protect
.EnableSelection = xlUnlockedCells
End With
'--------------------
Salutations!
"ThierryP" <petithory.thierry_NO_SPAM@club-internet.fr> a écrit dans le message de news: u3Y6i4NRFHA.2664@TK2MSFTNGP15.phx.gbl...
Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver
le magnifique message qui apparait quand on essaie de modifier une
cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce
maudit message continue à apparaitre..
D'avance merci
C'est possible si au moins une cellule de la feuille a la propriété "Locked = False" ( format / cellule / onglet protection).
Dans mon exemple j'ai choisi la cellule A1,
'-------------------- With Worksheets("Feuil1") .Unprotect .Range("A1").Locked = False .Protect .EnableSelection = xlUnlockedCells End With '--------------------
Salutations!
"ThierryP" a écrit dans le message de news: Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver le magnifique message qui apparait quand on essaie de modifier une cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce maudit message continue à apparaitre.. D'avance merci
@+ thierry :-))
ThierryP
Les deux solutions fonctionnent nickel (je n'en doutais pas !) Merci beaucoup à tous les deux !!
Thierry :-))
Bonjour Thierry,
C'est possible si au moins une cellule de la feuille a la propriété "Locked = False" ( format / cellule / onglet protection).
Dans mon exemple j'ai choisi la cellule A1,
'-------------------- With Worksheets("Feuil1") .Unprotect .Range("A1").Locked = False .Protect .EnableSelection = xlUnlockedCells End With '--------------------
Salutations!
"ThierryP" a écrit dans le message de news: Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver le magnifique message qui apparait quand on essaie de modifier une cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce maudit message continue à apparaitre.. D'avance merci
@+ thierry :-))
Les deux solutions fonctionnent nickel (je n'en doutais pas !)
Merci beaucoup à tous les deux !!
Thierry :-))
Bonjour Thierry,
C'est possible si au moins une cellule de la feuille a la propriété "Locked = False" ( format / cellule / onglet protection).
Dans mon exemple j'ai choisi la cellule A1,
'--------------------
With Worksheets("Feuil1")
.Unprotect
.Range("A1").Locked = False
.Protect
.EnableSelection = xlUnlockedCells
End With
'--------------------
Salutations!
"ThierryP" <petithory.thierry_NO_SPAM@club-internet.fr> a écrit dans le message de news: u3Y6i4NRFHA.2664@TK2MSFTNGP15.phx.gbl...
Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver
le magnifique message qui apparait quand on essaie de modifier une
cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce
maudit message continue à apparaitre..
D'avance merci
Les deux solutions fonctionnent nickel (je n'en doutais pas !) Merci beaucoup à tous les deux !!
Thierry :-))
Bonjour Thierry,
C'est possible si au moins une cellule de la feuille a la propriété "Locked = False" ( format / cellule / onglet protection).
Dans mon exemple j'ai choisi la cellule A1,
'-------------------- With Worksheets("Feuil1") .Unprotect .Range("A1").Locked = False .Protect .EnableSelection = xlUnlockedCells End With '--------------------
Salutations!
"ThierryP" a écrit dans le message de news: Bonjour tout le monde !
J'ai un petit pb : comme indiqué dans le sujet, je souhaite désactiver le magnifique message qui apparait quand on essaie de modifier une cellule protégée.
Dans Workbook_Open, j'ai placé application.displayAlert = False mais ce maudit message continue à apparaitre.. D'avance merci
