Dans un programme personnel de suivi des comptes sur ACCESS 97,
Mon formulaire renvois les données d'une table HISTOMOUV
avec un index numérique NUMINDEX.
Dans chaque enregistrement, le champ MONTANT est une somme du
type +25.00 ou -30.00.
Avec le code suivant, je peux mettre à jour une zone texte avec
le crédit suite au mouvement.
Private Sub CalculCredit()
Dim cred As Double
Dim numro As Integer
numro = Me!TxtNUMINDEX
cred = DSum("MONTANT", "HISTOMOUV", "[NUMINDEX] <=" & numro)
Me!TxtCREDIT = cred
End Sub
Quelqu'un pourrait-il m'indiquer une combine pour que ce calcul
soit fait pour chaque enregistrement avec un affichage en continu.
Merci d'avance!
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
3stone
Bonjour aussi,
"sergegras"
Dans un programme personnel de suivi des comptes sur ACCESS 97, Mon formulaire renvois les données d'une table HISTOMOUV avec un index numérique NUMINDEX. Dans chaque enregistrement, le champ MONTANT est une somme du type +25.00 ou -30.00. Avec le code suivant, je peux mettre à jour une zone texte avec le crédit suite au mouvement.
Private Sub CalculCredit() Dim cred As Double Dim numro As Integer numro = Me!TxtNUMINDEX cred = DSum("MONTANT", "HISTOMOUV", "[NUMINDEX] <=" & numro) Me!TxtCREDIT = cred End Sub
Quelqu'un pourrait-il m'indiquer une combine pour que ce calcul soit fait pour chaque enregistrement avec un affichage en continu.
Crée un champ calculé dans une requête... requête qui sera la source d'un formulaire en mode continu.
en admettant que NumRo soit un champ de la requête...
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Bonjour aussi,
"sergegras"
Dans un programme personnel de suivi des comptes sur ACCESS 97,
Mon formulaire renvois les données d'une table HISTOMOUV
avec un index numérique NUMINDEX.
Dans chaque enregistrement, le champ MONTANT est une somme du
type +25.00 ou -30.00.
Avec le code suivant, je peux mettre à jour une zone texte avec
le crédit suite au mouvement.
Private Sub CalculCredit()
Dim cred As Double
Dim numro As Integer
numro = Me!TxtNUMINDEX
cred = DSum("MONTANT", "HISTOMOUV", "[NUMINDEX] <=" & numro)
Me!TxtCREDIT = cred
End Sub
Quelqu'un pourrait-il m'indiquer une combine pour que ce calcul
soit fait pour chaque enregistrement avec un affichage en continu.
Crée un champ calculé dans une requête...
requête qui sera la source d'un formulaire en mode continu.
Dans un programme personnel de suivi des comptes sur ACCESS 97, Mon formulaire renvois les données d'une table HISTOMOUV avec un index numérique NUMINDEX. Dans chaque enregistrement, le champ MONTANT est une somme du type +25.00 ou -30.00. Avec le code suivant, je peux mettre à jour une zone texte avec le crédit suite au mouvement.
Private Sub CalculCredit() Dim cred As Double Dim numro As Integer numro = Me!TxtNUMINDEX cred = DSum("MONTANT", "HISTOMOUV", "[NUMINDEX] <=" & numro) Me!TxtCREDIT = cred End Sub
Quelqu'un pourrait-il m'indiquer une combine pour que ce calcul soit fait pour chaque enregistrement avec un affichage en continu.
Crée un champ calculé dans une requête... requête qui sera la source d'un formulaire en mode continu.