Note: The other languages of the website are Google-translated. Back to English
English English

Come applicare il blocco / sblocco dei riquadri a più fogli di lavoro contemporaneamente?

Supponendo che tu abbia una grande cartella di lavoro che contiene centinaia di fogli di lavoro, e ora devi applicare il Blocca riquadri per congelare tutti i fogli di lavoro contemporaneamente. Con la funzione Blocca riquadri di Excel, puoi semplicemente bloccare un solo foglio di lavoro alla volta, c'è un modo per congelare o sbloccare tutti i fogli di lavoro immediatamente in una volta in Excel?

Applica Blocca riquadri a tutti i fogli di lavoro contemporaneamente con il codice VBA

Applica Unfreeze Panes a tutti i fogli di lavoro contemporaneamente con il codice VBA

Applica Blocca / Sblocca riquadri a tutti i fogli di lavoro contemporaneamente con un clic con Kutools per Excel


È possibile utilizzare il codice seguente per applicare i riquadri di congelamento a tutti i fogli di lavoro, eseguire i seguenti passaggi:

1. Se si desidera bloccare tutti i fogli di lavoro nella stessa posizione, selezionare una cella che si desidera bloccare nel foglio di lavoro e quindi tenere premuto spostamento per selezionare tutte le schede dei fogli.

2. Tieni premuto il ALT + F11 chiavi e apre il file Finestra di Microsoft Visual Basic, Applications Edition.

3. Clic inserire > Moduloe incolla il codice seguente nel file Finestra del modulo.

Codice VBA: blocca tutti i fogli di lavoro contemporaneamente in Excel

Sub Freeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = True
    End With
Next
Application.ScreenUpdating = True
End Sub

4. E poi premere F5 chiave per eseguire questo codice e tutti i fogli di lavoro sono stati applicati con i riquadri di congelamento nella stessa posizione.

NOTA: Se tutti i fogli di lavoro non sono selezionati e le celle attive di ogni foglio di lavoro si trovano in posizioni diverse, i riquadri di congelamento si troveranno nei diversi punti delle celle attive.


Se sono applicati più fogli di lavoro con i riquadri di congelamento in Excel, come potresti sbloccarli alla volta tranne sbloccarli uno per uno?

1. Avvia la tua cartella di lavoro a cui sono stati applicati i fogli di lavoro con i riquadri di congelamento.

2. Tieni premuto il ALT + F11 chiavi e apre il file Finestra di Microsoft Visual Basic, Applications Edition.

3. Clic inserire > Moduloe incolla il codice seguente nel file Finestra del modulo.

Codice VBA: sblocca tutti i fogli di lavoro contemporaneamente in Excel

Sub UnFreeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = False
    End With
Next
Application.ScreenUpdating = True
End Sub

4. E poi premere F5 chiave per eseguire questo codice e tutti i fogli di lavoro applicati con i riquadri di congelamento sono stati sbloccati contemporaneamente.


Se non hai familiarità con i codici VBA, ecco uno strumento potente- Kutools for Excel, suo Blocca riquadri più fogli di lavoro e Sblocca riquadri più fogli di lavoro le utilità possono aiutarti a congelare o sbloccare tutti i fogli di lavoro della cartella di lavoro corrente contemporaneamente.

NOTA:Per applicare questo Blocca riquadri più fogli di lavoro, in primo luogo, dovresti scaricare il file Kutools for Excele quindi applica la funzione in modo rapido e semplice.

Dopo l'installazione Kutools for Excel, per favore fai come questo:

1. Seleziona una cella in cui desideri applicare il riquadro di blocco per tutti i fogli di lavoro, in questo caso faccio clic sulla cella B2, vedi screenshot:

doc congelare tutti i fogli 1-1

2. Quindi fare clic Kutools Plus > Foglio di lavoro > Blocca riquadri più fogli di lavoro, vedi screenshot:

3. E poi a tutti i tuoi fogli di lavoro sono stati applicati i riquadri di congelamento nella stessa posizione della cella B2.

Note:: Se desideri sbloccarli immediatamente, devi solo applicare la funzione Sblocca più fogli di lavoro facendo clic su Kutools Plus> Foglio di lavoro > Sblocca riquadri più fogli di lavoro.

Scarica e prova gratuitamente Kutools per Excel ora!


Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Scarica e prova gratuita ora!

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
Commenti (6)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
cari a tutti, ho un test nella mia cartella di lavoro, ho una buona nota che prima di applicare questa macro, sposta il mouse sulla cella che ti serve per applicare il riquadro di blocco nel foglio. è davvero utile. queste informazioni sono ciò che sto cercando. grazie mille Lan
Questo commento è stato fatto dal moderatore sul sito
Ho provato questo nella mia cartella di lavoro e ha funzionato molto bene. Grazie
Questo commento è stato fatto dal moderatore sul sito
vuoi essere in grado di bloccare la riga superiore su più fogli di lavoro
Questo commento è stato fatto dal moderatore sul sito
È possibile farlo solo su fogli di lavoro selezionati?

cosa dovrei cambiare nel codice.
Questo commento è stato fatto dal moderatore sul sito
Ciao, Fernando,

Per applicare il riquadro di blocco ai fogli selezionati, utilizzare il codice seguente:



Sottoblocco()

'Aggiorna entro Extendoffice

Oscura Ws come foglio di lavoro

Dim xArrName come variante

Dim xS

xArrName = Array("Sheet2", "Sheet3") 'Cambia i nomi dei fogli in base alle tue esigenze

Application.ScreenUpdating = False

Per ogni xS In xArrName

Imposta Ws = Fogli di lavoro(xS)

Se non Ws non è niente allora

Ws.Attiva

Con Application.ActiveWindow

.FreezePanes = Vero

Fine Con

End If

Successiva

Application.ScreenUpdating = True

End Sub



Si prega di provare, grazie!
Questo commento è stato fatto dal moderatore sul sito
Funzionerebbe, ma dovrei cambiare ogni volta che provo a eseguirlo in una cartella di lavoro diversa.

È possibile modificare la macro nei fogli che seleziono nel pannello principale facendo clic su uno e premendo Maiusc e selezionando gli altri?
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite