Discussion :

[jenniferIUP]

bonjour,

je travail sur un formulaire où je calcul la différence entre un nombre d'heure prévue et un nombre d'heure réalisée

et je souhaiterai que lorsque que le résultat de se calcul est >= 1 une case à cocher "dépassement" se coche automatiquement!

merci d'avance pour vos conseils

[Pierre Fauconnier]

Bonjour

J'utiliserais l'événement Sur Sortie du contrôle de saisie des heures réalisées (Realise est le champ des heures prestées, Budgete celui des heures prévues et Depassement est la case à cocher

Code :

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

1
2
3
Private Sub Realise_Exit(Cancel As Integer)
    Depassement = (Realise.Value > Budgete)
End Sub

Au delà des solutions proposées, quelle est la finalité de l'opération? (j'ai l'impression que tu vas te compliquer la vie... )

[isabelle b]

Bonjour

tu peux créer un évènement sur "activation" de ton formulaire et tu copie le code suivant :

Code :

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

1
2
3
4
5
6
7
8
 
Private Sub Form_Current()
If me.calcul >=1 then
Me.depassement = True
else
Me.depassement = False
end if
end sub

calcul étant le champs qui récupère le résultat de la différence entre les heures. Depassement un champ défini en tant que case à cocher (oui/non) dans ta table.

Puis pour qu'il s'active au moment ou tu saisis les heures (dans la première et la dernière sur chacun des champs après mise à jour tu colles le code :

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub heureDebut_AfterUpdate()
If me.calcul >=1 then
Me.depassement = True
else
Me.depassement = False
end if
 
End Sub

pareil pour heurefin


bonne journée

isabelle

[LE VIEUX]

bonjour,
comment sont alimentés les champs de ton formulaire ?
quel est le format de ces champs - numérique décimal - Heures ??
quand veux-tu que ta case a cocher le soit ?
a+

[jenniferIUP]

j'ai tenté vos deux proposition mais cela ne fonctionne pas
je sais pas tro quoi faire

merci en tous cas

[jenniferIUP]

mes deux champs calculé: nombre d'heure prévue et nombre d'heure réalisée sont des champs issue d'une requête où j'ai utilisé datediff

ensuite je fais dans un troisième champ la différence entre nbr_heureR - nbr_heureP

et je souhaiterais que lorsque le résultat de ce champ est supérieure ou = a 1, ma case à cocher depassement_horaire, se coche

[isabelle b]

c'est bizarre c'est ce que j'utilise

as tu bien adapté le code en fonction du nom de tes champs ?

[jenniferIUP]

oui je comprend pas non plus pourquoi cela ne marche pas parce que je trouvais se code logique

est ce que ce que vous apeler "calcul" et "depassement" se sont les nom des éiquette ou du controle (enfin je sais pas trop si vous voyer ce que je veux dire car je ne suis pas sur des termes)

voila en tous cas merci

[isabelle b]

il faut prendre le nom des champs :

depassement doit équivaloir à ton depassement_horaire
calcul est ton champs dans lequel s'affiche le résultat de datediff

cela dit la question que t'as posée LE VIEUX est très pertinente, ce code ne fonctionne que si ton résultat est exprimé en nombre

heures prévues 3 heures
heures réalisées 2 heures

je ne crois pas que datediff soit adapté dans ce cas, car il est utilisé pour calculer une différence entre des heures ou des dates ce qui ne semble pas être ton cas

Il te faut s'implement créer dans ta requête ou dans ton form un champ qui calcul la différence entre les heures prévues et les réalisées et c'est ce champ qui sera utilisé dans le code (soit calcul pour ce que je t'ai indiqué ou total)

mais tu dois absolument reprendre le nom des champs que tu as donné

ca va mieux là ?

[LE VIEUX]

re,
si ton champ résultat et au format date :
il faut que ta comparaison soit au même format
soit Ex

Code :

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

1
2
3
4
if me.MonChampDiff >= #1:00:00 AM# Then
 
Me.Depassement = True
End If

[jenniferIUP]

enfaite mais datediff sefont entre deux champs, c'est deux champs sont enfaite des champs concaténé d'une date et d'une heure

car parfois l'évènement dont je chercher a connaitre sa duré prévue et sa durée réelle peu avoir lieu sur un ou plusieurs jour

sinn mais champs ou jai le calculé du nbr dheure prévue et réalisé sont des champs numérique

[isabelle b]

sinn mais champs ou jai le calculé du nbr dheure prévue et réalisé sont des champs numérique

en ce cas c'est ce champ que tu dois considérer comme 'calcul' ou 'total'

mais il faut que tu lui choisisses un nom

C'est dur au début de comprendre mais on s'y fait

[Pierre Fauconnier]

Quel est le but poursuivi par le fait de cocher la case automatiquement en cas de dépassement des heures prestées par rapport à celles prévues?

Répondre à cette question ferait avancer les choses, car personnellement, en l'état actuel de la discussion, je ne vois pas l'intérêt de procéder ainsi.

Il peut être plus intéressant d'avoir un contrôle qui calcule la différence (positive ou négative) et qui se colorie conditionnellement selon le résultat obtenu.

De plus, Le Vieux a posé une question restée actuellement sans réponse:
Comment les contrôles du formulaire sont-ils alimentés? Récupères-tu toutes les infos d'une source de données (table ou requête) ou saisis-tu dans le formulaire les heures prestées pour les comparer aux heures prévues?

[LE VIEUX]

re,
dans ce cas il n'y a pas de raison que le code d'Isabelle mis sur le bon évenement ne marche pas - met un un point d'arrêt sur ton code et en faisant un débug pas a pas regardes ce que donne tes variables.