Nedbryd intervaller til enkeltnumre

Jamen først og fremmest skal du lave din struktur for tabelen en smule om dvs. at du skal bruge en kombineret primary key for id, nr. Så kunne du lave et lille script, der for hvert id gennemløber intervallet.. håber det gav lidt hjælp

hej Jensen > har jeg ikke lavet det her for dig engang før? :-)

Er det ok med en lille funktion der gennemløber tabel1 og så indsætter i tabel2 så du får det ønskede resultat?

Hvad med denne funktion. Antager at tabellerne hedder tabel1 og tabel2.

Function Transformer()

Dim db As dao.Database
Dim rs As dao.Recordset
Dim rs2 As dao.Recordset
Dim SQL As String
Dim i As Long
Set db = CurrentDb

SQL = "SELECT * FROM tabel1" 'skal den sorteres når den gennemløbes??

Set rs = db.OpenRecordset(SQL)
Set rs2 = db.OpenRecordset("tabel2")

Do While Not rs.EOF
    For i = rs!fra To rs!til
        rs2.AddNew
        rs2!ID = rs!ID
        rs2!nr = i
        rs2.Update
    Next
    rs.MoveNext
Loop

Set rs = Nothing
Set rs2 = Nothing
Set db = Nothing

End Function

Hvis tabel1 er meget stor tager det lidt tid at køre det igennem.

Tak foir hjælpen

Selv tak. arbejder du stadig med postnumre/postdanmark og løsninger til det område?

Nej, jeg har ikke været i Post Danmark i snart 2 år. Arbejder nu i sommerhusudlejningsbranchen