Note: The other languages of the website are Google-translated. Back to English
Login  \/ 
x
or
x
Registrati  \/ 
x

or

Come consentire la modifica di oggetti nel foglio di lavoro protetto in Excel?

Per impostazione predefinita, gli oggetti inseriti come forme e caselle di testo non possono essere modificati dopo aver protetto il foglio di lavoro. Se è necessario modificare gli oggetti in un foglio di lavoro protetto, provare i metodi in questo articolo.

Consenti la modifica degli oggetti nel foglio di lavoro protetto selezionando l'opzione Modifica oggetti
Consenti la modifica di oggetti nel foglio di lavoro protetto con codice VBA


Consenti la modifica degli oggetti nel foglio di lavoro protetto selezionando l'opzione Modifica oggetti


Controllare l'opzione Modifica oggetti per consentire la modifica degli oggetti prima di proteggere il foglio di lavoro. Si prega di fare quanto segue.

1. Clic Revisione > Proteggi foglio.

2. Nel Proteggi foglio finestra di dialogo, specificare una password nel file Password per rimuovere la protezione del foglio casella e seleziona il file Modifica oggetti casella nella casella Consenti a tutti gli utenti di questo foglio di lavoro, quindi fare clic su OK pulsante. Conferma la tua password nel file Conferma password la finestra di dialogo. Vedi screenshot:

Ora il foglio di lavoro è protetto e tutti gli oggetti in questo foglio di lavoro protetto sono modificabili.


Consenti la modifica di oggetti nel foglio di lavoro protetto con codice VBA

Se il foglio di lavoro è già stato protetto, puoi provare lo script VBA di seguito per consentire la modifica degli oggetti. Si prega di fare quanto segue.

1. premi il altro + F11 tasti contemporaneamente per aprire il file Microsoft Visual Basic, Applications Edition finestra.

2. Nel Microsoft Visual Basic, Applications Edition finestra, fare doppio clic Questa cartella di lavoro sulla sinistra Progetto Pannello. Quindi copia e incolla il codice VBA sottostante nel file ThisWorkbook (codice) finestra.

Codice VBA: consente di modificare gli oggetti nel foglio di lavoro protetto

Private Sub Workbook_Open()
    Application.ScreenUpdating = False
    On Error Resume Next
    With Worksheets("Sheet3")
        .EnableOutlining = True
        .EnableAutoFilter = True
        .Protect Password:="123", _
        Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True, _
        AllowFormattingCells:=True
    End With
    Application.ScreenUpdating = True
End Sub

Osservazioni:: Nel codice, Sheet3 è il foglio di lavoro protetto che contiene gli oggetti che devi modificare. E il numero "123" è la password del foglio protetto. Si prega di cambiarli come necessario.

3. premi il F5 chiavi per eseguire il codice e tutti gli oggetti in questo foglio di lavoro protetto sono modificabili immediatamente.


Articoli correlati:


I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office / Excel 2007-2019 e 365. Supporta tutte le lingue. Facile distribuzione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce centinaia di clic del mouse ogni giorno!
fondo officetab
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Vanessa · 11 months ago
    Hi,
    thanks for the helpful article. I tried the VBA Code method but it doesn't quite work for me.


    My Code (sorry for formatting, couldn't copy&past it):


    Sub Workbook_Open ()

    Dim ws As Worksheet

    For Each ws In Worksheets

    ws.Protect UserInterfaceOnly:=True, Password:="123"

    ws.Enable AutoFilter = True

    ws.EnableOutlining = True

    If ActiveSheet.Protection.AllowFormattingColumns = False Then

    ActiveSheet.Protect AllowFormattingColumns:=True

    End If

    With Worksheets ("Sheet1")

    .EnableOutlining = True

    .EnableAutoFilter = True

    .Protect Password:="123", _

    Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True

    End With

    Next ws

    End Sub


    It works just fine but as soon as I'm saving, closing and reopening the file, I am either

    - requested to insert the Password (like 5 times) immediately or

    - able to remove the protection without any Password for one of the worksheets (usually "Sheet1" as in the Code)


    Is somebody getting the same error as me? Or can somebody help me?


    Thank you in advance.


    BR

    Vanessa