Question : Macro d'Excel pour supprimer des rangées basées sur des conditions

J'importe quelques documents de HTML dans Excel et les voudrais nettoyer la présentation avant l'économie il comme un dossier d'Excel.  Je voudrais créer un macro pour enlever un groupe de rangées blanches aussi bien que quelques rangées qui commencent comme ceci : le
No du

Z:\websitepublic\ ...... a choisi des documents trouvés en ce texte de Directory

The ci-dessus est toujours dans la colonne D et E.

I doivent également enlever les rangées doubles qui ont les en-têtes de colonne suivantes : les mots-clés de sujet d'auteur de titre du

Documents ont créé le version

I AM de créateur nouveau à créer des macros dans Excel et apprécieraient du conseil sur la façon dont faire this.
class= de

Réponse : Macro d'Excel pour supprimer des rangées basées sur des conditions

Employer ce code…

Saurabh…

1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
Deleterows secondaires ()
Application.ScreenUpdating = faux

    Faible srow en tant que longtemps
    srow = 1

    Faire jusqu'au srow > au Cells.Find (ce qui : = " * ", SearchDirection : =xlPrevious, SearchOrder : =xlByRows). Rangée
        S'InStr (1, cellules (srow, « a »), « Z:\websitepublic\ », vbTextCompare) > 0 ou InStr (1, cellules (srow, « a »), « aucuns documents choisis dans cet annuaire », vbTextCompare) > 0 puis
            Rangées (srow). Suppression


        ElseIf Application.WorksheetFunction.CountA (gamme (srow et « :  » et srow)) = 0 puis
         Rangées (srow). Suppression
         Autrement
            srow = srow + 1
        Finir si
    Boucle


Application.ScreenUpdating = rectifient
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