HJÆLP Access udrulning af uger til anden tabel

Hej
Jeg er ved at udviklen en database der bl.a. skal kunne håndtere styring af hal-booking.

jeg mangler en kode der kan overføre data til en anden tabel (tblTraeningUdrullet)

Bruger opretter en ny booking (tblTraeningstider)
ved bla. at udfylde TraeningsID (autonr.felt), StartDato og SlutDato. På baggrund af StartDato og SlutDato beregnes UgeStart og UgeSlut vha. koden

___________________________________________
Option Compare Database
Option Explicit

Private Sub SlutDato_AfterUpdate()

    Me.UgeSlut.Value = DatePart("ww", Me.SlutDato.Value, vbMonday, vbFirstFourDays)

End Sub

Private Sub StartDato_AfterUpdate()

    Me.UgeStart.Value = DatePart("ww", Me.StartDato.Value, vbMonday, vbFirstFourDays)
   
    Me.UgeDag.Value = WeekdayName(Weekday(Me.StartDato.Value, vbMonday), False, vbMonday)

End Sub
_____________________________________________

Koden er placeret på en formular.
Jeg forestiller mig at bruger skal klikke på en knap. Ved klik udrulles data over i tblTraeningUdrullet

F.eks. der er oprettet en bokking
TraeningsId: 1
StartDato: 01-01-02
SlutDato: 26-02-02

(er jo fra uge 1 til uge 9)

Der klikkes på knappen og flg. data overføre til tblTraeningUdrullet:

TraeningsIDRef: 1
Ugenr: 1

TraeningsIDRef: 1
Ugenr: 2

osv. (indtil den når uge 9, hvor den skal stoppe)

Er ikke i tvivl om at koden bla. skal indeholde et loop, men hvordan???

Hilsen Susanne