B BbertrandB XLDnaute Nouveau 24 Septembre 2010 #1 Bonjour le forum, Je souhaiterais rendre impossible le fait de pouvoir remplir toutes les cellules de certaines lignes. Cela est-il possible sans protéger l'intégralité de la feuille ? Merci d'avance pour votre aide. Bon week-end. Bertrand.
Bonjour le forum, Je souhaiterais rendre impossible le fait de pouvoir remplir toutes les cellules de certaines lignes. Cela est-il possible sans protéger l'intégralité de la feuille ? Merci d'avance pour votre aide. Bon week-end. Bertrand.
B BbertrandB XLDnaute Nouveau 24 Septembre 2010 #2 Re : Protéger ligne uniquement Merci beaucoup, est-ce possible d'insérer un message d'erreur personnalisé quand un utilisateur essaye d'écrire dans une cellule protégée ? Vote positif 0 Vote négatif
Re : Protéger ligne uniquement Merci beaucoup, est-ce possible d'insérer un message d'erreur personnalisé quand un utilisateur essaye d'écrire dans une cellule protégée ?
B BbertrandB XLDnaute Nouveau 24 Septembre 2010 #3 Re : Protéger ligne uniquement J'aimerais un peu plus détailler l'explication afin que l'utilisateur ne croit pas que toute la feuille est protégée mais seulement certaines. Vote positif 0 Vote négatif
Re : Protéger ligne uniquement J'aimerais un peu plus détailler l'explication afin que l'utilisateur ne croit pas que toute la feuille est protégée mais seulement certaines.
B BbertrandB XLDnaute Nouveau 24 Septembre 2010 #4 Re : Protéger ligne uniquement Le code n’apparaît pas :s Vote positif 0 Vote négatif
B BbertrandB XLDnaute Nouveau 24 Septembre 2010 #5 Re : Protéger ligne uniquement Je suis désolé mais lorsque je copie la macro, elle n’apparaît pas en faisant ensuite Alt+F8 Vote positif 0 Vote négatif
Re : Protéger ligne uniquement Je suis désolé mais lorsque je copie la macro, elle n’apparaît pas en faisant ensuite Alt+F8
B BbertrandB XLDnaute Nouveau 24 Septembre 2010 #6 Re : Protéger ligne uniquement ok, Voilà ce qui en ressort Sub Worksheet_SelectionChange() Dim plage As Range Set plage = Range("d32:z32") If Not Intersect(Target, plage) Is Nothing Then [a1].Select MsgBox ("Cellule interdite") End If End Sub Vote positif 0 Vote négatif
Re : Protéger ligne uniquement ok, Voilà ce qui en ressort Sub Worksheet_SelectionChange() Dim plage As Range Set plage = Range("d32:z32") If Not Intersect(Target, plage) Is Nothing Then [a1].Select MsgBox ("Cellule interdite") End If End Sub