[Risolto]Password in celle su foglio protetto

[Muset]

Buongiorno,
in un foglio protetto vorrei che in alcune celle si possa assegnare una password per un amministratore, è possibile?
Nell'allegato la spiegazione è più chiara.
Grazie

[lucky63]

.
Una possibile soluzione, per altro anche molto semplice e banale, è quella di utilizzare un altro foglio a modifica esclusiva del fiduciario.
In questo foglio prepari un format per l'inserimento degli orari ...
Gli orari inseriti nel format dal fiduciario acquisiti dalle formule delle corrispondenti celle (protette) del foglio originario (protetto).
…
Allego esempio per rendere meglio l'idea (al momento la protezione fogli è attiva ma senza password).
Ricordo comunque che le password di protezione foglio sono blande e chi ci sa “smanettare” può riuscire a rimuoverla.
.

[Muset]

Buongiorno Lucky,
grazie per il suggerimento, è una soluzione a cui avevo pensato se non avessi trovato altro rimedio, ma grazie ad un amico smanettone (con il codice sono un poppante) ho optato per una macro (ora devo vedere se a tutti va bene ) altrimenti userò il foglio FIDUCIARIO. Non so come allegare il codice quindi lo copio qui:

Codice: Seleziona tutto

Option Explicit

Dim PassVerified As Boolean

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim MyPassword As String
    Dim FiduciarioRng As Range
    Dim PassIns As String
    
    MyPassword = cells( 1, 1 )
    Set FiduciarioRng = Range("C19:C23")
    If Not Intersect(Target, FiduciarioRng) Is Nothing Then
        If PassVerified = False Then
            PassIns = InputBox("Inserire la password del fiduciario del plesso:", "FIDUCIARIO PLESSO")
            If PassIns = MyPassword Then
                PassVerified = True
            Else
                MsgBox "Password Errata", vbCritical + vbOKOnly, "ACCESSO NEGATO"
            End If
        End If
    Else
        PassVerified = False
    End If
End Sub

in A1 il fiduciario scriverà la sua password e darà colore bianco al carattere per nasconderla
Grazie di tutto e alla prossima

[lucky63]

ho optato per una macro

Normalmente ... una persona che ci sa un po' smanettare può arrivare facilmente al codice della macro e riesce a comprendere il suo significato e dove si trova la password del fiduciario.
Anche se ne nascondessi la riga o la colonna gli risulterebbe comunque facile risalire alla stessa applicando in una qualsiasi cella non protetta una formula del tipo:
=NomeFoglio.NomeDellaCella
o anche inserendo direttamente nel codice macro una semplice riga:

Codice: Seleziona tutto

Print MyPassword

oppure

Codice: Seleziona tutto

MsgBox(MyPassword)

dopo la sua definizione.

Se permani nella tua decisione di optare per la "macro" creati almeno una libreria specifica protetta da password ove inserirla onde limitare possibili interventi da parte di smanettoni.
.

[Muset]

Grazie Lucky per l'osservazione, che raccolgo volentieri, ma visto il contesto (un semplice orario) ritengo abbastanza improbabile che qualche docente voglia perdere del tempo a sabotare l'applicazione, serve più che altro a sottolineare il fatto che quegli orari sono di competenza esclusiva dei fiduciari; detto questo la tua pertinente e precisa osservazione me la tengo cara per contesti in cui sarà utile una maggiore sicurezza. Grazie, come sempre brillante, attento e preciso