Sviluppare funzionalita su Microsoft Office con VBA Bloccare celle dopo inserimento dati e sblocco con password

LoginRegistrati
Stai vedendo 2 articoli - dal 1 a 2 (di 2 totali)
  • Autore
    Articoli
  • #27876 Risposta

    helly

      Ciao a tutti,
      premetto che sono pochi giorni che sto smanettando con Vba e macro.
      La mia esigenza è quella di bloccare le celle dopo l'inserimento di un dato, impossibilitandone cosi la modifica/eliminazione con la possibilità di sbloccarle attraverso una password.
      La mia situazione è questa:
      inserisco il dato e premo invio , la cella quindi viene bloccata e posso rimuovere la protezione di quella cella solo attraverso una password. 

      Ho verificato e la seguente formula funziona ma non so come inserire la password per lo sblocco.

      Grazie mille in anticipo

       

      Private Sub Worksheet_Activate()
      Cells.Select
      Selection.Locked = False
      ActiveSheet.Protect
      End Sub

      Private Sub Worksheet_SelectionChange(ByVal Target As Range)

      If Not Intersect(Target, Range("A4:A1000")) Is Nothing Then

      ActiveSheet.Unprotect

      If Target.Value <> "" Then
      Selection.Locked = True
      Selection.FormulaHidden = False
      ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
      End If
      End If

      End Sub

      #27877 Risposta

      GiuseppeMN
      Partecipante
        9 pts

        Buona sera, @helly;
        se ho interpretato correttamente la tua richiesta potresti provare con, per proteggere:

        ActiveSheet.Protect Password:="TuaPassword"

        per sproteggere;

        ActiveSheet.Unprotect Password:="TuaPassword"

        Buona serata.

        Giuseppe

      LoginRegistrati
      Stai vedendo 2 articoli - dal 1 a 2 (di 2 totali)
      Rispondi a: Bloccare celle dopo inserimento dati e sblocco con password
      Gli allegati sono permessi solo ad utenti REGISTRATI
      Le tue informazioni:



      vecchio frac - 2750 risposte

      albatros54
      albatros54 - 1009 risposte

      patel
      patel - 976 risposte

      Marius44
      Marius44 - 848 risposte

      Luca73
      Luca73 - 720 risposte