| | Post: 3 | Registrato il: 22/04/2018
| Città: MONTECARLO | Età: 68 | Utente Junior | 2013 | | OFFLINE | |
|
19/11/2018 19:16 | |
ho un file di excel gestito con una serie di macro che svolgono varie azioni (ordinamento, filtri secondo vari criteri).
come istruzione macro, prima di far eseguire le varie operazioni, ho messo queste righe di codice:
Sheets("dati").Select
Range("A3").Select
If ActiveSheet.ProtectContents Then
ActiveSheet.Unprotect "PASSWORD"
Else
ActiveSheet.Protect "PASSWORD"
End If
Come faccio ad aggiungere l'informazione che voglio sempre attive le opzioni
DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowSorting:=True, AllowFiltering:=True, _
AllowUsingPivotTables:=True
Ho provato a mettere questo blocco di opzioni dopo l'istruzione ActiveSheet.Protect prima dell'indicazione della password ma mi dà errore... |
|
| | Post: 2.016 | Registrato il: 06/04/2013
| Utente Veteran | 2010 | | OFFLINE |
|
20/11/2018 10:13 | |
ciao
quelle istruzioni sono parte integrante della funzione Protect quindi:
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowSorting:=True, AllowFiltering:=True, _
AllowUsingPivotTables:=True
Saluti
[Modificato da dodo47 20/11/2018 10:15] Domenico
Win 10 - Excel 2016 |
| | Post: 3 | Registrato il: 22/04/2018
| Città: MONTECARLO | Età: 68 | Utente Junior | 2013 | | OFFLINE | |
|
20/11/2018 10:21 | |
Grazie mille! |
|
|