Question : Feuilles de travail de suppression en cahier de travail

Je reçois un cahier de travail d'un groupe, qui a plusieurs worksheetes dont j'ai besoin pour pouvoir supprimer sytematically certaines feuilles de travail, y compris les feuilles de travail cachées avant de courir un

Worksheet de query.

par exemple qu'une feuille de travail F Delete
Worksheet G Keep

Hidden du keep
Worksheet C Keep
Worksheet D Delete
Hidden de Delete
Worksheet B/>Then sauvent le cahier de travail qui a la feuille de travail B, la feuille de travail C, et la feuille de travail G à un nouveau file. class= de

Réponse : Feuilles de travail de suppression en cahier de travail

Ce code économisera en tant que « newfile.xls » au même annuaire avec seulement les feuilles qui ont des noms stockés dans les strNames

À la votre

Dave
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
22 :
23 :
24 :
25 :
26 :
27 :
28 :

RemoveSheets secondaire ()
    Faibles strNames (1 4) comme corde
    Le faible WS comme feuille de travail

    ActiveWorkbook.SaveAs ActiveWorkbook.Path et « \ newfile »

    strNames (1) = « feuille A »
    strNames (2) = « feuille B »
  strNames (3) = « feuille C »
  strNames (4) = « feuille G »

    Avec l'application
        .DisplayAlerts = faux
        .ScreenUpdating = faux
    Extrémité avec

    Sur le résumé d'erreur après
    Pour le chaque WS dans ActiveWorkbook.Sheets
        Sinon Application.WorksheetFunction.Match (WS. Nom, strNames, 0) > 0 puis WS. Suppression
    Après

    Avec l'application
        .DisplayAlerts = rectifient
        .ScreenUpdating = rectifient
    Extrémité avec


Sous-marin d'extrémité
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
    •
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
    •
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
    •
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
    •
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
    •
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
    •
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
    •
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
    •
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
    •
  •  Winzip 12 issues de secours du travail ?
    •
     
    programming4us programming4us