Immagino che giorgioa faccia riferimento ai tab del menu' di XL2007 oppure 2010; il tab Revisione contiene le icone Proteggi/Sproteggi Foglio e Proteggi /Sproteggi cartella di lavoro (giorgio: se imposti la versione che usi crei meno confusione; guarda le istruzioni nella mia firma).
Ma proprio questo riferimento alla protezione /sprotezione foglio fatta dal menu utente mi porta a suggerire di NON lavorare con UserInterFaceOnly:=True MA con la classica protezione /sprotezione; lavorare con UserInterFaceOnly:=True e' infatti piu' complesso dell' altro metodo e va in crisi se l' utente puo' o deve usare il Proteggi /Sproteggi da menu.
Cio' detto, quindi giorgio deve inserire in testa alla sua macro l' istruzione
- Codice: Seleziona tutto
ActiveSheet.Unprotect Password:="miapsw" '<< Usa la vera password; questa Sprotegge
- Codice: Seleziona tutto
Sheets("Foglio1").Unprotect Password:="miapsw" '<< Usa il vero NomeFoglio; usa la vera password
E in coda
- Codice: Seleziona tutto
ActiveSheet.Protect Password:="miapsw" << Usa la vera password; questa Protegge
- Codice: Seleziona tutto
Sheets("Foglio1").Protect Password:="miapsw" '<< Usa il vero NomeFoglio; usa la vera password
NB: se la macro ha piu' punti di uscita, ognuno di essi dovra' includere l' istruzione .Protect (oppure vanno unifichi su un unico punto di uscita che contenga la .Protect)
Se hai difficolta' a fare questo allora pubblica il codice della tua macro e ci inseriremo noi queste due istruzioni.
Ciao