🚀 go-pugleaf

Thx!

Een andere oplossing die ik had bedacht is : voeg het ding vanboven toe en
sorteer dan opnieuw.

ICHAU <ichau@glo.be> schreef in berichtnieuws
8djpc3$ert$1@trex.antw.online.be...
> Met het volgende zou het moeten lukken, U moet wel zorgen dat er in de
> gebruikte kolom (hier A) steeds gegevens staan.
>
> Sub ZoekLegeRij()
>     Dim Rij As Integer
>     Rij = 1
>     Do Until Range("A" & Rij) = ""
>         Range("A" & Rij).Select
>         Rij = Rij + 1
>     Loop
>     Range("A" & Rij) = "LEEG"
>     Range("A" & Rij).Select
> End Sub
>
> Succes,
> Jos
>
> NightOwl heeft geschreven in bericht <956078169.529498@marvin>...
> >Ik zit met het volgende probleem :
> >
> >graag zou ik (voor een overzichtelijk rapport) enkele gegevens uit een
> >Access db (waarvan sommige gewoon on the fly gegenereert worden) opslaan
in
> >een nieuwe Excel rij. Probleem : hoe spring je automatisch naar de eerste
> >nieuwe (lege) rij?
> >
> >Bedoeling is dus : onderaan de al bestaande tabel een nieuw item toe te
> >voegen?
> >
> >
> >
>
>