Reimpostare automaticamente password protezione foglio1 a chiusura del file excel

Question

Buongiorno a tutti!

Ho questa necessità:

nel mio file excel, sul foglio1 ho impostato una password di protezione foglio; per lavorare sul foglio ho la necessità di togliere ogni volta la password e in chiusura a volte mi dimentico di rimetterla.

C'è la possibilità di un'automatismo che mi reimposti la password protezione foglio1 ogni volta che chiudo il file excel?

Grazie a tutti in anticipo.

Max

Answer 1

Non ho capito.

Private Sub Workbook_Open()

     Me.Worksheets("Foglio1").Protect Password:="Pippo"

     UserForm2.Show vbModal

End Sub

Non ho nessun conflitto.

Answer 2

Bene!

Grazie per il cortese riscontro.

Ciao e alla prossima.

Answer 3

MI serviva proprio che mi unissi le due 'OPEN'...adesso è ok.

Grazie mille!

Max

Answer 4

Grazie Mauro.

Ho però un conflitto con questa macro già presente:

Private Sub Workbook_Open()

UserForm2.Show vbModal

End Sub

Answer 5

Copia incolla il codice qui sotto nel modulo di codice di ThisWorkbook (o Questa_cartella_di_lavoro per le versioni di Office 2010 e seguenti):

Private Sub Workbook_Open()

    Me.Worksheets("Foglio1").Protect Password:="Pipp o"

End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)

    Me.Worksheets("Foglio1").Protect Password:="Pippo"

End Sub

Modifica la parte in grassetto con la tua password. Il file DEVE essere salvato come .xlsm o .xls, NON .xlsx.

Se non hai mai utilizzato il vb di Excel, vedi:

• http://answers.microsoft.com/it-it/office/wiki/office_2013_release-excel/excel-dove-e-come-inserire-il-codice-visual-basic/ed29ee63-a537-4e5d-8631-76766cf40503