Protezione Foglio su chiusura file

Hai un problema con Excel?

Nuova discussione

Protezione Foglio su chiusura file
di Pietro (utente non iscritto) data: 23/07/2013 11:32:24
Salve ragazzi, rieccomi qui a chiedervi un aiuto.
Ho un file excel sul quale ho inserito una protezione (Revisione/Proteggi foglio).
Quando un utente deve modificare i dati del foglio, sprotegge il foglio, inserisce la password e modifica tranquillamente i dati. La mia necessità è che se l'utente dimentica di inserire la password e chiude il foglio il file resta sprotetto.
Ho bisogno che quando chiude il file, la protezione si rimetta automaticamente, come posso fare?
Grazie mille.
Protezione Foglio su chiusura file
di Pietro (utente non iscritto) data: 23/07/2013 11:48:15
Sarebbe l'ideale poter avere questa situazione:
Apertura file con messaggio "Vuoi visualizzare i dati o lavorare sul foglio sprotetto?"
E poi, sempre alla chiusura del file, si rimette di nuovo la password in modo da avere il file sempre protetto.
di paolomath data: 23/07/2013 12:01:05
Per mettere la protezione in chiusura potresti inserire il codice seguente (evento BeforeClose della Cartella).
Vedilo come spunto di lavoro... da affinare come preferisci.

Hai sempre il salvataggio dei dati inseriti (con vantaggi e svantaggi)

Il messaggio iniziale lo vedo un po' fastidioso, dipende dall'uso del file e dalle preferenze dell'utente. Se lo apre "sempre" per fare lo stesso tipo di cose potrebbe non aver voglia di dire al PC cosa vuol fare...

Bye
Private Sub Workbook_BeforeClose(Cancel As Boolean) ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True ActiveWorkbook.Save End Sub
Protezione Foglio su chiusura file
di Pietro (utente non iscritto) data: 23/07/2013 12:40:01
Grazie mille per la risposta. Ho verificato e la cartella risulta protetta, ma se volessi inserire una password all'interno del codice? Cosa devo inserire?
Protezione Foglio su chiusura file
di Pietro (utente non iscritto) data: 23/07/2013 12:50:40
Dimenticavo una cosa, nel foglio ci sono anche i filtri che devono essere attivi anche quando il foglio è protetto.
di paolomath data: 23/07/2013 13:05:51
cit: "
Grazie mille per la risposta. Ho verificato e la cartella risulta protetta, ma se volessi inserire una password all'interno del codice? Cosa devo inserire?"

ActiveSheet.Protect Password:="INSERISCI LA PASSWORD CHE VUOI", DrawingObjects:=True, Contents:=True, Scenarios:=True

cit: "Dimenticavo una cosa, nel foglio ci sono anche i filtri che devono essere attivi anche quando il foglio è protetto."

Quando inserisci (setti) la protezione scorri l'elenco delle azioni permesse, troverai Usa filtro automatico.

Bye
di Cesare (utente non iscritto) data: 23/07/2013 13:16:25
ActiveSheet.Protect ("tuapassword")

Metti questo codice in chiusura di foglio.
per lasciare attivi i filtri e sufficiente che nella proprietà protezione delle celle con i filtri togli la spunta a bloccata.
di Cesare (utente non iscritto) data: 23/07/2013 13:17:38
ooops, ti hanno già risposto mentre scrivevo :)
Chiedo venia per l'intromissione
di paolomath data: 23/07/2013 13:24:02
cit: "Chiedo venia per l'intromissione"

Mica sono proprietà private

Ogni aituo è ben accetto.

Bye bye

Vuoi Approfondire?