Sytse1
Gebruiker
- Lid geworden
- 9 aug 2007
- Berichten
- 584
- Office versie
- miDer
In dit forum staan verschillende vragen over het tellen van records.
Ik heb ook hierover een vraag.
De volgende VBA functie telt 1 record meer dan er in de tabel staat.
Het kan toch niet zo zijn dat een evt nieuw record wordt meegeteld?
Wellicht zit er toch een fout in deze code?
De volgende code werkt goed maar dat -1 moet toch niet de bedoeling zijn.
Ik heb ook hierover een vraag.
De volgende VBA functie telt 1 record meer dan er in de tabel staat.
Het kan toch niet zo zijn dat een evt nieuw record wordt meegeteld?
Code:
Function TelRec()
With Forms!F_1 'Formulier naam F_1
If Forms!F_1.RecordsetClone.RecordCount > 0 Then Forms!F_1.RecordsetClone.MoveLast
!txtRecordDisplay = "Nr: " & .CurrentRecord & " van totaal " & .RecordsetClone.RecordCount
End With
End FunctionDe volgende code werkt goed maar dat -1 moet toch niet de bedoeling zijn.
Code:
Function TelRec()
With Forms!F_1 'Formulier naam F_1
If Forms!F_1.RecordsetClone.RecordCount > 0 Then Forms!F_1.RecordsetClone.MoveLast
!txtRecordDisplay = "Nr: " & .CurrentRecord & " van totaal " & .RecordsetClone.RecordCount - 1
End With
End Function
Laatst bewerkt:
