La modération vous a écrit: Titre corrigé pour un meilleur énoncé de la question. Le terme macro est inutile dans cette section.
Bonjour.
Ma question est simple: {Comment protéger une feuille "par Macro" en interdisant la saisie des cellules vérouillées".} Il sagit d'inscrire dans la macro les arguments du panneau de protection de la feuille accessibles par le menu {Outil / Proteger le document / Feuille}
En effet : La feuille étant protégée, si l'utilisateur selectionne des cellules protégées contigues à des cellules non protégées et fait un mouvement avec la souris (Bt Gauche enfoncé), les cellules protégées se copient à l'endroit où le pointeur s'arrête.
La personne qui manipule l'application est d'une extreme maladresse et selectionne tout et n'importe quoi. Ce qui a pour avantage de faire apparaitre des complications.
Clairement, mon code très basique est le suivant :
Code : Tout sélectionner
REM ============================PROTECT_1 ====================================
Sub Protege_1()
Dim MonDoc as Object, MaFeuille as Object
MonDoc = ThisComponent
Mafeuille = MonDoc.Sheets.getByName("Saisie")
[i][b] rem ?_Ici je doit inscrire les arguments de protection [saisissabe ou non] _? [/b][/i]
Mafeuille.protect("P")
End Sub
REM =============================FIN PROTECT_1=================================