Verouillage conditionnel

Bonjour,

J'aimerais donner accès a quiconque de remplir les cellules vides de ma base de donnée excel, mais en même temps, interdit a quiconque d'effacer les données une fois écrire. En résumé, pour effacer une écriture il faut passer une autre écriture.

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Bonsoir
    peut être un format conditionnel et des styles définis

    si cellule vide style "non verrouillé" sinon "verrouillé"
    1. Bien reçu et merci
      La difficulté,c'est que je sais pas comment écrire la formule.
      Un exemple m'aurais grandement facilité la tache.
  2. Contributeur
    Bonjour,

    par une validation je ne vois pas.
    Avec un petit code :
    Private Sub Worksheet_Change(ByVal Target As Range)
        Dim v
        If Not Intersect(Target, Union([A2:B10], [E2:F10])) Is Nothing Then
            v = Target.Formula
            Application.EnableEvents = False
            Application.Undo
            If Target = "" Then
                Target.Formula = v
            ElseIf InputBox("mot de passe") = "cmoi" Then
                Target.Formula = v
            End If
        End If
        Application.EnableEvents = True
    End Sub

    https://www.cjoint.com/c/GIorGTr42Xy
    Si c'est pour toute la feuille enlève le If Not Intersect...
    eric

    En essayant continuellement, on finit par réussir. 
    Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
    En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci