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 esborrar totes les fitxes de treball en blanc a Excel?

Si teniu un quadern de treball que té moltes fulles de treball, mentrestant, hi ha alguns fulls de càlcul en blanc. I ara voleu eliminar els fulls de càlcul en blanc per desar o arxivar el fitxer. Com es pot buscar els fulls en blanc de diversos fulls de treball i esborrar-los automàticament?

Elimineu totes les fitxes de treball en blanc amb el codi VBA

Elimineu totes les fitxes de càlcul amb Kutools per a Excel


fletxa blau dreta bombolla Elimineu totes les fitxes de treball en blanc amb el codi VBA


És molest per a vostè que comproveu les fitxes de fulls en blanc i elimineu-les un per un, però amb el següent codi VBA, podeu eliminar fàcilment tots els fulls de càlcul a la vegada.

1. Mantingueu premut el botó ALT + F11 tecles i obre el Microsoft Visual Basic per a aplicacions finestra.

2. Clic Insereix > Mòduls, i enganxeu el següent codi a la finestra Mòdul.

VBA: suprimeix tots els fulls de càlcul en blanc

Sub DeleteBlankWorksheets () 'Actualitza 20130830 Dim Ws Com ho fareu el full de càlcul sobre el reinici d'errors Next Application.ScreenUpdating = False Application.DisplayAlerts = False per a cada ws en Application.Worksheets If Application.WorksheetFunction.CountA (Ws.UsedRange) = 0 Ws.Delete End Si Next Application.ScreenUpdating = True Application.DisplayAlerts = True End Sub

3. A continuació, premeu F5 , i totes les fitxes de fulls en blanc s'eliminen alhora.


fletxa blau dreta bombolla Elimineu totes les fitxes de càlcul amb Kutools per a Excel

Si no esteu familiaritzat amb el codi VBA, us puc presentar una eina fàcil: Kutools for Excel, Amb la seva Elimina fulls de càlcul en blanc funció, podeu eliminar tots els fulls de càlcul buits amb un sol clic.

Kutools for Excel Inclou més eines 300 pràctiques d'Excel. Lliure de provar sense límit en 30 dies. Agafa-ho ara.

Quan hàgiu instal·lat Kutools for Excel, feu els passos següents:

1. Clic empresa > Eines de full de treball > Elimina fulls de càlcul en blanc, veure captura de pantalla:

doc-delete-blank-sheets1

2. I apareixerà una caixa ràpida per recordar-vos si voleu suprimir tots els fulls de càlcul o no, consulteu la captura de pantalla:

doc-delete-blank-sheets2

3. A continuació, feu clic a , i les fitxes en blanc s'han eliminat correctament. Veure captures de pantalla:

doc-delete-blank-sheets3
-1
doc-delete-blank-sheets4

Si voleu saber més sobre aquesta funció, feu clic a Elimina fulls de càlcul en blanc.


Article relacionat:

Com esborrar fulls de càlculs ocults a Excel?



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.
  • To post as a guest, your comment is unpublished.
    Ems · 1 years ago
    Public member 'WorksheetFunction' on type 'WorkbookClass' not found.
    i'm using Interop.Excel