Een bestand heeft 4.800 records.
Hiervan dienen 91 records te worden geselecteerd.
4.800 : 91 = 52,74 ---> elke 52e record dient te worden geselecteerd.

Startpositie: bijvoorbeeld: 4e

Gewenste records: 4, 56, 105, 160, 212, ... (91 records).


Dit dient te worden toegepast op meerdere bestanden met telkens variabele aantallen.

voorbeeld van tweede bestand:

Een bestand heeft 3.000 records.
Hiervan dienen 30 records te worden geselecteerd.
3.000 : 30 = 100 ---> elke 100e record dient te worden geselecteerd.

Startpositie: bijvoorbeeld: 5e

Gewenste records: 5, 105, 205, 305, 405, ... (30 records).


Hoe kan dit op een snelle manier????? ???

Dit zou inderdaad via VBA (zit in Excel) kunnen, maar is in tegenstelling tot wat ceasar schrijft niet "workbook" gebonden. De code kan zo geschreven worden dat ze voor vershillende bestanden kan gebruikt worden.

Maar het zou inderdaad wel handig kunnen zijn om te weten wat er moet gebeuren na selectie van de "records" (ik veronderstel dat je hiermee een rij bedoeld).

Hallo,

Ik weet niet of je vertrouwd bent met VBA, bijgevolg zal ik proberen om zo eenvoudig mogelijk uit te leggen wat je moet doen :

Maak een nieuw bestand in Excel en druk Alt-F11 (VBA wordt opgestart).  Kies Invoegen / Procedure. Vul bovenaan een naam in bv. Selecteren en druk op de OK-knop.

Nu krijg je volgende structuur :

Public Sub Selecteren()

End Sub

Plak volgende code tussen deze twee lijnen :

Dim AantalRijen, StartPositie, AantalRecords, i, Rij, Selectie As Integer
Sheets("Blad1").Select
Sheets("Blad1").Copy After:=Sheets(1)
Range("A1").Select
AantalRijen = ActiveCell.SpecialCells(xlLastCell).Row
StartPositie = InputBox("Wat is de eerste rij (startpositie)?", "Vraag")
Rows("1:" & StartPositie - 1).Delete
AantalRecords = InputBox("Hoeveel records wenst u te selecteren?", "Vraag")
Selectie = AantalRijen / AantalRecords
Selectie = Selectie - 2
Range("A1").Select
For i = 1 To AantalRecords + 1
    ActiveCell.Offset(1, 0).Select
    Rij = ActiveCell.Row
    Rows(Rij & ":" & Rij + Selectie).Delete
Next

Nu sla je het bestand op. Via Bestand / Opslaan. Dit mag in VBA of in Excel gebeuren.

VBA mag je nu afsluiten.

Indien je nu een bestand hebt waarvan je records wenst te selecteren moet je dit bestand openen en het zopas aangemaakte bestand ook. Ga in het bestand met de records staan en kies : Extra / Macro / Macro's.

Nu zie je een lijst met de bestaande macro's (in de geopende werkmappen). Daar zie je de bestandsnaam staan en de naam van de procedure, van elkaar gescheiden met een !-teken. Kies de gemaakte procedure (in het voorbeeld Selecteren) en druk op de knop Uitvoeren.

Normaal zou hij nu een werkblad moeten toevoegen en hierop de gevraagde gegevens tonen.

Veel succes ermee (indien je nog vragen hebt moet je het maar laten weten)

Groetjes