Les galetes ens ajuden a lliurar els nostres serveis. En utilitzar els nostres serveis, accepteu el nostre ús de cookies.
Consell: altres idiomes es tradueixen en Google. Pots visitar el English versió d'aquest enllaç.
Iniciar Sessió
x
or
x
x
Registre
x

or

Com protegir automàticament totes les fitxes en tancar el llibre d'Excel?

Normalment, podeu protegir manualment un full de càlcul o el llibre sencer per contrasenya amb la funció Protegir fulla o Protegir llibreta en Excel. Però si voleu protegir automàticament totes les fitxes amb la contrasenya en tancar el llibre, què podeu fer? Aquest article us mostrarà un mètode VBA per aconseguir-ho.

Protegiu tots els fulls de treball quan tanqueu el llibre d'Excel amb codi VBA


Protegeix ràpidament múltiples o tots els fulls de treball amb contrasenya al mateix temps en el llibre actual:

El Protegeix el full de treball utilitat de Kutools for Excel us ajuda a protegir fàcilment diverses o totes les fitxes de treball amb contrasenya al mateix temps. Mostra la captura de pantalla a continuació:

  • Activa el Protegeix el full de treball utilitat
  • Consulteu les fulles que protegiu alhora
  • Especifiqueu la contrasenya

Kutools for Excel: amb més complements Excel de 200, gratuïts per intentar sense limitacions en 60 dies. Descarregueu la prova gratuïta Ara!


Protegiu tots els fulls de treball quan tanqueu el llibre d'Excel amb codi VBA


Per protegir automàticament totes les fitxes al tancar el llibre, apliqueu el codi VBA següent.

1. En el llibre que voleu protegir totes les fitxes quan tanqueu el fitxer, premeu el botó Alt + F11 claus per obrir el Microsoft Visual Basic per a aplicacions finestra.

2. A la Microsoft Visual Basic per a aplicacions finestra, feu doble clic a la icona ThisWorkbook al panell esquerre i, a continuació, copieu-lo sota el codi VBA a la finestra Codi. Mostra la captura de pantalla:

Codi VBA: protegeix totes les fitxes en tancar el llibre

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Update by Extendoffice 2018/1/24
    Dim xSheet As Worksheet
    Dim xPsw As String
    xPsw = ""
    For Each xSheet In Worksheets
        xSheet.Protect xPsw
    Next
End Sub

notes:

1) En el codi, especifiqueu la vostra contrasenya a la línia xPsw = "".

2) Si només voleu protegir automàticament un full de treball especificat al tancar el llibre, el codi de VBA que es troba a continuació us pot ajudar.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Sheets("Sheet1").Protect "123"
    ActiveWorkbook.Save
End Sub

3. A continuació, premeu la tecla Alt + Q claus per tancar la finestra de Microsoft Visual Basic per a aplicacions.

Després del pas anterior, tots els fulls de treball o el full de treball especificat es protegiran automàticament al tancar el llibre.

notes:

1. Heu de guardar el llibre com a format d'arxiu del llibre de treball d'Excel Macro-Enabled.

2. Aneu al full de càlcul determinat, feu clic a Crítica > Desenrotlla la fulla. A continuació, escriviu la contrasenya que heu especificat al codi VBA per desproteger aquest full de càlcul.


Articles relacionats:



Eines de productivitat recomanades

Pestanya d'Office

estrella d'or1 Porteu les pestanyes pràctiques a l'Excel i a un altre programari d'Office, igual que Chrome, Firefox i el nou Internet Explorer.

Kutools for Excel

estrella d'or1 Increïble! Incrementeu la productivitat en 5 minuts. No necessites cap habilitat especial, estalvieu dues hores cada dia.

estrella d'or1 300 Noves característiques per a Excel, Excel molt fàcil i potent:

  • Combina cel·les / files / columnes sense perdre dades.
  • Combina i consolida diverses fulles i llibres.
  • Comparar intervals, copiar diversos rangs, convertir text a data, unitat i conversió de divises.
  • Compte per colors, subtotals de paginació, classificació avançada i filtre súper,
  • Més Seleccioneu / Insereix / Suprimeix / Text / Format / Enllaç / Comentari / Llibres / Eines de full de càlcul ...

Tret de pantalla de Kutools per a Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.