Pilotage d'une requête par VBA

Version imprimable

27/05/2014, 16h26
arnaud03

Pilotage d'une requête par VBA

Bonjour,

Je dispose d'un formulaire avec plusieurs listes déroulantes.Mon but est de piloté en VBA ma reqûte croisé via ces listes déroulantes.
Outre la fonction "critères" de la reqûete existe-il une solution VBA pour que ma requête croisé s'adapte en fonction des listes déroulantes de mon formulaire ?

Merci
27/05/2014, 18h56
ClaudeLELOUP

Bonjour et bienvenue,

Tu n'as pas besoin de VBA pour cela !

Tu cliques droit dans la cellule qui correspond au critère de ta requête :

http://claudeleloup.developpez.com/ForumAccess/k497.jpg

et tu te laisses guider par l'assistant qui va t'écrire la syntaxe pour te référer au contenu d'un contrôle de ton formulaire.

Cela ressemblera à :

Code:

Formulaires!LeNomDuFormulaire!LeNomDuContrôle
28/05/2014, 08h25
arnaud03

Bonjour,

le souci étant que cette requête croisé viendra alimenter un état:

j'ai une requête qui m'affiche la présence de mon salarié en fonction des mois, or si un salarié n'est pas présent durant 1 mois, l'état ne veut plus se lancer et m'affiche une fenêtre d'erreur.

merci de votre aide
28/05/2014, 08h40
ClaudeLELOUP

Bonjour,

Peux-tu poster une BdD en format Access2000 avec des données "anonymisées" de test ?
01/06/2014, 20h47
arnaud03

3 pièce(s) jointe(s)

Bonsoir,

j'ai un formulaire qui me sert a filtrer ma reqûete
Pièce jointe 147468

lorsque je choisis un mois, dans l'exemple, Juin, et que je choisis une direction, le fait de cliquer sur le bouton Valider ouvre l'état associé:

Pièce jointe 147469

j'ai 192.3 salariés présents pour le mois de juin. ok !

Maintenant si je coche l'option Cumul du formulaire, j'aimerai avoir le Cumul de Janvier à Juin. C'est là ou je bloque dans les critères de la requête:
'listemois" correspond à la liste déroulante du formulaire

Pièce jointe 147470

Merci de votre aide
02/06/2014, 00h53
Smoky184

Citation:

Envoyé par ClaudeLELOUP

Bonjour,

Peux-tu poster une BdD en format Access2000 avec des données "anonymisées" de test ?

ClaudeLELOUP n'a pas tort. Avec votre fichier ce serait tout de même plus simple, mais m'étant immiscé dans la conversation, ne serait-ce pas plus pratique et plus rapide avec un filtre directement en VBA :

Code:

DoCmd.OpenReport "Votre_Etat", acPreview, "", "[Mois]<=" & LeMois & " and [Filtre]=" & LeFiltre & ""

Avec un If cumul ou mois vous devriez n'avoir besoin que d'un seul Etat.

Cordialement, Nicolas
10/06/2014, 15h20
arnaud03

Bonjour,

Avec cette formule, on filtre directement sur l'état ?

Je voudrais filtrer directement sur la requête pour que l'état s'ajuste automatiquement, est-ce possible ?

merci

Bonjour,

Oui avec ce code vous filtrez directement l'état.
Code:

1 2 3 4 5 6 7 8 9 Case .OptionBouton(1).Value ' Valeur /mois 'On ouvre le report sur un filtre du 1 à fin de mois selctionné Case .OptionBouton(2).Value ' Valeur au cumul ' On ouvre le report sur un filtre du 01/01/2014 au Fin de mois sélectionné Case Else MsgBox("Vous n'avez pas sélectionné d'option !",vbOKOnly, "Option non sélectionnée") End Select
Il est difficile de vous aider sans voir votre BDD. Pourriez-vous nous la mettre en pièce jointe SVP ?

Cordialement, Nicolas

16/06/2014, 17h01
amzerd

Demande de renseigenements

Bonjour
Je rencontre un problème dans mon programme sous Access vba.

1 : c'est possible de modifier un fichier PDF (Ajouter des zones de textes)
2: j'ai fais un programme qui permet d'ajouter un dessin sur une image en utilisant les événement mousemove,mouseup,mousedown. Sur le pc et avec une souris sa marche très bien .
une fois j'ai transféré mon programme sur une tablette /PC le stylet ne réagis pas comme une souris .

Merci pour votre compréhension
17/06/2014, 00h28
Smoky184

Bonjour.
Je crois que quelque chose vous à échappé. ..

Citation:

Envoyé par amzerd

Bonjour
Je rencontre un problème dans mon programme sous Access vba.

1 : c'est possible de modifier un fichier PDF (Ajouter des zones de textes)
2: j'ai fais un programme qui permet d'ajouter un dessin sur une image en utilisant les événement mousemove,mouseup,mousedown. Sur le pc et avec une souris sa marche très bien .
une fois j'ai transféré mon programme sur une tablette /PC le stylet ne réagis pas comme une souris .

Merci pour votre compréhension

Totalement hors sujet :furieux:
Merci d'ouvrir un nouveau sujet si vous avez une question qui n'a absolument rien à voir avec la question d'origine.

Merci de lire les règles du forum !

Mis à part l'exportation d'un état ou formulaire en pdf, ou, comme sur votre autre sujet l'ouverture d'un Fichier via du VBA quel est le rapport avec Access ? Ne pourriez vous pas non plus mettre cet autre sujet en résolu si la réponse vous convient (vu que vous n'y avez pas prêté attention depuis le 07/05/2014) !!

Vous méritez votre :moinsser:

Bien à vous, Nicolas