Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 24/10/2011, 00h09   #1
Membre actif
 
Inscription : septembre 2007
Messages : 630
Détails du profil
Informations forums :
Inscription : septembre 2007
Messages : 630
Points : 165
Points : 165
Par défaut Comment faire pour valider la saisie d'un champs automatiquement ?

Bonjour,
J'utilise un FORM avec un sous Form qui, lui, est en mode feuille de données.

Ce sous form contient des colonnes :
JANVIER, FEVRIER, ... , DECEMBRE
L'utilisateur saisit des qtés dans 1 ou plusieurs mois selon son besoin.
la qté peut-être de 1 à 9999.

Une fois la saisie faîte, l'utilisateur clique sur un bouton pour lancer un calcul selon les valeurs saisies.

Pour faire simple, disons que le calcul lancé est l'addition de toutes les valeurs saisies.

Mon pb est que je viens de m'apercevoir d'un pb avec la saisie des colonnes (pb sur la dernière colonne saisie (quel que soit le mois) :
si je saisis un nombre (ex : 5, en JANVIER et 10 en MARS) et que je clique sur mon bouton pour lancer le calcul.
ACCESS ne me 'voit' que la valeur de janvier soit 5.

Celle de MARS (10) n'est pas 'vue' car le curseur est resté dans le champ. Donc ACCESS ne considère pas la valeur comme validée.
Comment puis-je faire pour éviter que mon user laisse son curseur après la saisie d'un valeur dans un champ ? ou comment faire pour qu'Access prenne bien en compte toutes les valeurs saisies ?

Merci pour vos conseils.
Thibault
tibofo est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/10/2011, 00h48   #2
Membre habitué
 
Homme
Conseil - Consultant en systèmes d'information
Inscription : octobre 2008
Messages : 212
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 51
Localisation : France

Informations professionnelles :
Activité : Conseil - Consultant en systèmes d'information
Secteur : Conseil

Informations forums :
Inscription : octobre 2008
Messages : 212
Points : 126
Points : 126
Bonsoir Tifobo,

Essaie d'insérer cette ligne avant de lancer ton calcul
Code :
DoCmd.RunCommand acCmdSaveRecord
@+
Triton972 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/10/2011, 10h05   #3
Rédacteur/Modérateur

 
Avatar de argyronet
 
Homme Jean-Philippe AMBROSINO
Panseur de bobos en solutions ETL
Inscription : mai 2004
Messages : 3 657
Détails du profil
Informations personnelles :
Nom : Homme Jean-Philippe AMBROSINO
Localisation : France

Informations professionnelles :
Activité : Panseur de bobos en solutions ETL
Secteur : Finance

Informations forums :
Inscription : mai 2004
Messages : 3 657
Points : 6 222
Points : 6 222
Envoyer un message via MSN à argyronet
Bonjour,

Je te réponds par 2 questions :

Quel lien existe t-il entre le form et le sous form ?
et comment le calcul est-il effectué ?

Poste un peu de code... Là, ce n'est pas évident de te répondre.

Argy
__________________
Ils comptent sur vous...

Ce qui donne son sens à la communication, c´est la réponse que l´on obtient. Si vous n´obtenez pas la réponse voulue, communiquez différemment.

Web Site@Mail
Livres : VBA pour OFFICE 2007 et MICROSOFT ACCESS 2007
Nouveau Tutoriel : Déployer vos applications avec Microsoft Access 2010
MDB Viewer : Visionneuse Access v4.0
argyronet est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 26/10/2011, 23h31   #4
Membre du Club
 
Vincent GUILLON
Inscription : octobre 2009
Messages : 58
Détails du profil
Informations personnelles :
Nom : Vincent GUILLON

Informations forums :
Inscription : octobre 2009
Messages : 58
Points : 46
Points : 46
as tu tenté d'actualiser ton sous-form avant d'executer le calcul ?
celà validera la saisie de ton user !

@+
vince
nolliug est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 30/10/2011, 08h51   #5
Membre actif
 
Inscription : septembre 2007
Messages : 630
Détails du profil
Informations forums :
Inscription : septembre 2007
Messages : 630
Points : 165
Points : 165
Merci à vous tous pour vos réponses !!

J'ai trouvé un moyen tout bête. sur mon bouton, j'ai mis en 1ère ligne de code, le focus sur un autre champ.

du coup mon calcul est bon !

Merci
tibofo est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 30/10/2011, 14h45   #6
Membre actif
 
Avatar de robyseb
 
Homme Sébastien
Développeur indépendant
Inscription : juillet 2011
Messages : 178
Détails du profil
Informations personnelles :
Nom : Homme Sébastien
Localisation : Canada

Informations professionnelles :
Activité : Développeur indépendant

Informations forums :
Inscription : juillet 2011
Messages : 178
Points : 193
Points : 193
Salut c'est normal que maintenant ca fonctionne puisque en mettant le focus sur un autre champ tu provoque un update automatique de access qui en même temp fait un "Save" au niveau des tables....

moi j'ai déja créer un calcul selon plusieurs champ voici le code en VBA ... ca peut te donner une piste comment t'y prendre

Code :
1
2
3
4
5
6
7
8
9
'La valeur par défault de mes champs est 0
Private Sub champ1_AfterUpdate()
If Me.champ <= 4 Then
Me.champ_total = Me.champ1 + Me.champ2 + Me.champ3
Else
MsgBox "veuillez saisir un chiffre entre 1 et 4 merci", vbInformation, "Chiffre trop élevé"
End If
End Sub
'meme code pour champ2 et champ3 etc...
Donc sans bouton le calcul se fait automatiquement
__________________
Parfois il faut faire le tour d'une roche 10 fois avant de s'apercevoir quelle est ronde.
  • Si vous trouvé mon post intéressant, n'oubliez pas de voter coté inférieur droit du message. Merci
  • Si votre Post est indiquez le....
robyseb est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 11h45.


 
 
 
 
Partenaires

Hébergement Web