Vraag : De Vraag van de toegang

Hello allen, heb ik een beetje die van probleem een vraag in toegang proberen te berekenen benieuwd zijn en of heeft iedereen één of ander idee.  Ik heb een lijst van de merkvraag die beleidsnamen heeft en exp data en beleidstypes daarin worden gebruikt die.  Ik heb uit om het even welke beleidsnamen gefiltreerd die een streepje in de naam hebben en een expdatum groter dan of gelijk aan 8/1/2010 hebben.  Nochtans in de lijst bekijkt de vraag het REC gebied dat vermelde duplicaten heeft, omdat zij meer dan één beleid met een verschillend beleidstype konden hebben.  Het probleem is ik wil slechts de lijst de vraag maakt om beleid te tonen dat slechts een beleidsnaam (REC) heeft die eens voorkomt.  Ik werd verteld dit allen in één vraag zou kunnen worden gedaan, maar ik kan niet berekenen hoe te om het te doen.  Dank u voor om het even welke hulp u offer. moet
Attachments:
van
het scherm van de vraag is ontsproten aangezien het stands
die style= " breedte

Antwoord : De Vraag van de toegang

Als zij allen in D. zijn.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
Sub x ()
  
Schemerige rFind als Waaier

Application.ScreenUpdating = Vals

Met Bladen („verzoen“). Kolommen (4)
    Reeks rFind =. Vind (wat: = " Richtsnoer ", LookAt: =xlWhole, MatchCase: =False, SearchFormat: =False)
    Als niet rFind dan niets is
        
            rFind.EntireRow.Delete
            Plaats rFind =. Vind (wat: = " Richtsnoer ", LookAt: =xlWhole, MatchCase: =False, SearchFormat: =False)
        De lijn tot rFind is niets
    Beëindig als
Eind met
     
Application.ScreenUpdating = Waar
     
Sub van het eind
Andere oplossingen  
 
programming4us programming4us