Welkom op het forum van startpagina!

Dit forum staat op alleen-lezen. Je kan hier informatie zoeken en oude berichten terugvinden, maar geen nieuwe berichten plaatsen.

Naar overzicht van alle forums

for each

  • Sabrina

    Dim rstDepartementWorkload As ADODB.Recordset

    Set rstDepartementWorkload = New ADODB.Recordset

    rstDepartementWorkload.Open “DepartementWorkload”, CurrentProject.Connection, adOpenStatic, adLockOptimistic

    For each … in rstDepartementWorkload

    Next …

    rstDepartementWorkload.Close

    Set rstDepartementWorkload = Nothing

  • Sabrina

    Dim rstDepartementWorkload As ADODB.Recordset

    Set rstDepartementWorkload = New ADODB.Recordset

    rstDepartementWorkload.Open “DepartementWorkload”, CurrentProject.Connection, adOpenStatic, adLockOptimistic

    For each … in rstDepartementWorkload

    berekeningen

    update record

    Next

    rstDepartementWorkload.Close

    Set rstDepartementWorkload = Nothing

    Ik wil voor elk record berekeningen doorvoeren en dan een update uitvoeren.

    Ik geraak in de problemen met mijn for each.

    Welke is de correct syntax?

  • RobV

    volgens mij is het for.. next

  • RobV

    met for each

    for each x In getallen()

    debug.Print x

    next x

    ————————————-

    met for

    for i = 1 to 10

    getallen (i) = Rnd(1)

    next i

    succes robv

  • RobV

    nog een voorbeeldje for next.

    http://office.webforums.nl/forum/viewtopic.php?t=10051