Discussion :

[lucas-18]

Bonjour,

Je reprends l'explication du site sur le positonnement du curseur sur le 1er enregistrement sur formulaire continu avec la méthode requery : http://access.developpez.com/sources...ms#RequeryFrom

Et voici le code que j'ai adapté un ptit peu. A la place de DoCmd.GoToRecord , , aclast j'ai mis DoCmd.RunCommand acCmdRecordsGoToNew mais le problème c'est que le curseur revient sur l'enregistrement qui était actif alors que je veux qu'il se mette sur l'enregistrement suivant.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
Private Sub Amount_AfterUpdate()
On Error GoTo GestErr
 
Echo False
 
If Me.RecordsetClone.RecordCount = 0 Then Exit Sub
lngClé = Me!ID_Paymt2
lngEnrActif = Me.CurrentRecord
 
Me.Requery
 
Set rs = Me.RecordsetClone
With rs
 
  If rs.RecordCount = 0 Then Exit Sub
  .FindFirst "ID_Paymt2=" & lngClé
  Select Case .NoMatch
    Case True
      DoCmd.GoToRecord , , acGoTo, lngEnrActif
    Case False
      Me.Bookmark = .Bookmark
  End Select
End With
rs.Close
Set rs = Nothing
 
Echo True
 
Exit Sub
 
GestErr:
Select Case Err
  Case 2105
 
      DoCmd.RunCommand acCmdRecordsGoToNew
 
  Case Else
    MsgBox Err.Description, Err.Number
End Select
rs.Close
Set rs = Nothing
 
Echo True
 
End Sub

[lucas-18]

En fait, j'ai un problème lorsqu'il se trouve sur le dernier enregistrement ; il faudrait qu'il se mette sur un nouvel enregistrement dans ce cas-ci.

Parce que pour les enregistrements déjà crées pas de problème ...