Nombre total d'enregistrement
GDX
Messages postés
219
Date d'inscription
Statut
Membre
Dernière intervention
-
GDX Messages postés 219 Date d'inscription Statut Membre Dernière intervention -
GDX Messages postés 219 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je souhaite connaitre dans mon script vba l'enregistrement dans lequel se trouve l'utilisateur et le nombre total d'enregistrement.
Les numéros d'enregistrements sont présents en bas à gauche d'un formulaire pour ceux ne voient pas de quoi je parle.
Pour l'enregistrement courant, j'ai trouvé la fonction approprié, il s'agit de "CurrentRecord", mais pour le nombre max, je ne vois pas.
Merrci pour l'aide.
Je souhaite connaitre dans mon script vba l'enregistrement dans lequel se trouve l'utilisateur et le nombre total d'enregistrement.
Les numéros d'enregistrements sont présents en bas à gauche d'un formulaire pour ceux ne voient pas de quoi je parle.
Pour l'enregistrement courant, j'ai trouvé la fonction approprié, il s'agit de "CurrentRecord", mais pour le nombre max, je ne vois pas.
Merrci pour l'aide.
A voir également:
- Impossible d'effectuer l'opération en raison d'un nombre excessif d'enregistrements
- Vous devez disposer d'une autorisation pour effectuer cette action - Guide
- Compte facebook désactivé sans raison - Guide
- Mon pc freeze sans raison - Guide
- Nombre de jours entre deux dates excel - Guide
- Impossible de terminer l'opération car le fichier contient un virus - Forum Virus
3 réponses
Merci,
C'est exactement ça.
Cependant, j'ai un phénomène super étrange qui se produit.
Ce code contrôle des boutons.
Quand l'enregistrement courant atteint le dernier enregistrement, ça désactive le bouton "Suivant".
Quand l'enregistrement courant atteint le premier enregistrement, ça désactive le bouton "Precedent".
Ce code fonctionne correctement si je place un point d'arrêt en face du premier if et que j'exécute le programme en pas à pas.
Sans le point d'arrêt le programme ne fonctionne pas les boutons sont toujours désactivés.
On a l'impression que l'exécution du programme est trop rapide.
Merci,
C'est exactement ça.
Cependant, j'ai un phénomène super étrange qui se produit.
Private Sub Form_Current()
If CurrentRecord = Total Then
Suivant.Enabled = False
Else
Suivant.Enabled = True
End If
If CurrentRecord = 1 Then
Precedent.Enabled = False
Else
Precedent.Enabled = True
End If
End Sub
Ce code contrôle des boutons.
Quand l'enregistrement courant atteint le dernier enregistrement, ça désactive le bouton "Suivant".
Quand l'enregistrement courant atteint le premier enregistrement, ça désactive le bouton "Precedent".
Ce code fonctionne correctement si je place un point d'arrêt en face du premier if et que j'exécute le programme en pas à pas.
Sans le point d'arrêt le programme ne fonctionne pas les boutons sont toujours désactivés.
On a l'impression que l'exécution du programme est trop rapide.
Merci,
Dans form_open, tu ne devrais avoir que suivant.enabled = true et precedent.enabled = false, puisque c'est la première fois.
Ca ne marche toujours pas car le programme passe pas form_current qui remet suivant.enable à false.
Par contre j'ai trouver un méthode qui fonctionne mais elle est vraiment mer*ique...
Je laisse ce post ouvert si jamais qqun arrive à faire fonctionner le code avec la méthode : Me.RecordsetClone.recordcount
Merci,
GDX
Ca ne marche toujours pas car le programme passe pas form_current qui remet suivant.enable à false.
Par contre j'ai trouver un méthode qui fonctionne mais elle est vraiment mer*ique...
Public Total As Double
Private Sub Form_Load()
DoCmd.GoToRecord , , acLast
Total = CurrentRecord
DoCmd.GoToRecord , , acFirst
End Sub
Private Sub Form_Current()
If CurrentRecord = Total Then
Suivant.Enabled = False
Else
Suivant.Enabled = True
End If
If CurrentRecord = 1 Then
Precedent.Enabled = False
Else
Precedent.Enabled = True
End If
End Sub
Je laisse ce post ouvert si jamais qqun arrive à faire fonctionner le code avec la méthode : Me.RecordsetClone.recordcount
Merci,
GDX
