Generer Code

Fermé

salbiah1 Messages postés 52 Date d'inscription mercredi 12 juin 2013 Statut Membre Dernière intervention 24 avril 2017 - 13 févr. 2015 à 15:43
le meruvien Messages postés 1125 Date d'inscription vendredi 12 août 2011 Statut Membre Dernière intervention 15 décembre 2024 - 14 févr. 2015 à 06:27

Bonjour
J'ai deux Tables Table Vente et table de Depense
je veux lorsque je saisie depense total de vente duminie

Option Compare Database
Public Ancien

Private Sub Depense_Enter()
Ancien = Depense
End Sub

Private Sub Depense_AfterUpdate()
If Depense - Ancien > Vente Then
If MsgBox("Le Montant est trop", vbOKOnly) = vbOK Then
SendKeys "{ESC}", True
Depense.SetFocus
Depense = ""
End If
Else

Dim MajDepot As Integer
MajDepot = Vente + Ancien - Depense
Vente = MajDepot
End If

A voir également:

1 réponse

Réponse 1 / 1

le meruvien Messages postés 1125 Date d'inscription vendredi 12 août 2011 Statut Membre Dernière intervention 15 décembre 2024 40
14 févr. 2015 à 06:27

bonjour,
??? bizare, alors tu veut quoi exactement ??

Discussions similaires

code d'activation GTA 5 steam

Code de renvoi d'appel : Ooredo, Mobilis...

sertissage des cables rj45

Réinitialisation d'un téléphone mobile chinois avec touche