Vraag : Hoe te om een Macro te creëren om spaties uit het Aantekenvel van Excel te verwijderen 2007

Hallo all
I ongeveer een workshet met 100k rijen in excel2007.  Ik moet 4 lege rijen, 1 lijn van gegevens en een andere lege rij na het verwijderen.  Kon iemand me hoe te om een macro om mijn aantekenvel schoon te maken tot stand te brengen alstublieft tonen? />Please


Thanks schrappen

Antwoord : Hoe te om een Macro te creëren om spaties uit het Aantekenvel van Excel te verwijderen 2007

Paul, te proberen gelieve dit:

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

Sub BajanPaul ()
Schemerige lastRow zoals lang, I zoals lang
Application.ScreenUpdating = Vals
lastRow = ActiveSheet.UsedRange.Rows.Count
Voor I = lastRow aan 6 Stap -1
    Als niet IsNull (Rijen (I). Tekst) en IsNull (Rijen (I - 1). Tekst) en niet IsNull (Rijen (I - 2). Tekst) en _
        Niet IsNull (Rijen (I - 3). Tekst) en niet IsNull (Rijen (I - 4). Tekst) en niet IsNull (Rijen (I - 5). Tekst) toen
                        Waaier (Rijen (I - 5), Rijen (I)). Schrap
            i = I - 5
    Eind als
Daarna
Application.ScreenUpdating = Waar
Sub van het eind
Andere oplossingen  
 
programming4us programming4us