Discussion :

[Pierre Dumas]

Bonjour

Je vous expose la situation simplifiée.

J'ai une table d'objectifs (TObjectifs) avec par date et par site (une dizaine), trois indicateurs.

J'ai par ailleurs une table de planning (TPlanning) me donnant à chaque ligne une date, un site et (entre autres) des valeurs pour les trois mêmes indicateurs.

J'ai fait une requête (RPlanning) sur la TPlanning qui me permet d'afficher pour telle fourchette de dates (et plein d'autres critères facultatifs), toutes les lignes qui correspondent.
J'ai fait un formulaire (FPlanning) sur cette requête dont les différents contrôles (menus déroulants et zones de textes) situés en Entête de formulaire alimentent la RPlanning.

Dans cet entête, il y a aussi des zones de textes qui donnent les sommes sur les trois indicateurs pour chacun des sites.
Jusque là tout va bien et tout est relativement rapide.

Par contre, je dois comparer mes sommes Planifiées sur les trois indicateurs par rapport aux objectifs pour chacun des sites.

Pour cela j'ai créé un simple requête (RObjectifs) sur la TObjectifs et la RPlanning, qui regroupe par Site et fait la somme de chacun des indicateurs. Cette requête affiche donc une ligne par site et 3 colonnes. Pas de soucis non plus.

Ce que je veux c'est de mettre les valeurs de RObjectifs dans des zones de texte dans l'entête de mon formulaire.

La seule solution que j'ai trouvé à présent est d'utiliser la formule suivante dans des zones de texte : SomDom("[SommeDeIndicateur1]";"RObjectifs";"Site='AAA'")
Mais même avec une toute petite requête RObjectifs, le temps est trop long d'afficher les 30 résultats dans le formulaire. Et cela ralentit d'autant les affichages des autres calculs.

Est-ce que l'on peut avoir une autre manière d'afficher les résultats de ma requête RObjectifs dans 30 zones de texte dans l'entête de mon formulaire FPlanning ? Pour information, les indicateurs doivent y être, même sans résultat, et toujours à la même place, d'où la contrainte des zones de texte.

J'espère avoir été complet sans être trop long, et merci d'avance à ceux qui m'apporteront leur lumière.

Bon après-midi

Pierre Dumas

[marot_r]

Bonjour.

De ce que j'ai compris, ma solution serait de faire une requête qui fait la somme par site et je me servirai de cette requête comme source de l'affichage.
J'utiliserai une requête croisée dynamique ou une simple requête "group by", selon ce qui est le plus pratique, pour calculer les totaux pour tous les sites.
L'avantage de la requête croisée dynamique c'est qu'elle peut te permettre d'afficher tes résultats en tableau directement plutôt que d'aller chercher chacune des valeurs une par une.

A+

[Pierre Dumas]

Bonsoir

Merci marot_r, mais je ne peux pas faire une requête d'analyse croisée (malheureusement), car j'ai des contraintes d'affichage (de couleurs, de dispositions, de positions) qui m'obligent aux zones de texte.

Je rappelle que les informations que je cherche à afficher sont à mettre dans l'entête du formulaire.

Je suis même prêt à faire 30 requêtes s'il le faut, mais je crois que l'on ne peut pas afficher directement le résultat d'une requête dans une zone de texte. Même si cette requête n'a qu'une ligne et qu'une colonne en résultat.

Cela pourrait être une solution : est-ce que l'on peut afficher dans une zone de texte le résultat d'une requête qui n'a qu'une ligne et qu'une colonne ? Sans passer par une fonction de domaine bien entendu.

Dans l'attente d'une autre suggestion, je vous souhaite une bonne soirée

Pierre Dumas

[marot_r]

Bonjour.

Pour la requête croisée dynamique tu peux peut-être quand même t'en servir comme source dans un sous-formulaire que tu mets dans l'entête de ton formulaire en utilisant la mise en forme conditionnelle pour tes couleurs et autre.
Mais ce n'est pas forcément la plus adaptée à ton besoin.

Pour l'affichage tu peux mettre dans la source de ton contrôle quelque chose comme : =DFirst("TonChamp", "TaRequetePourTotaux", "Site=""AAA""").
Généralement Access est plus rapide si il lit les données depuis une requête que si on utilise les fonctions de domaine.

Et, si tes totaux ne sont pas mis à jour dynamiquement quand tu les regardes, tu peux aussi envisager de mettre les totaux dans une table temporaire et afficher depuis cette table temporaire.
Là l'affichage sera instantané (ou presque) une fois les totaux faits.
Attention de bien s'assurer que la table soit à jour avant l'affichage.

A+

[marot_r]

Et j'avoue que pour les stats sur des données "figées", je préfères utiliser Excel et ses tableaux croisés dynamiques.
Tu exportes tes données Access et ensuite tu les mets en forme et affiche dans Excel.
Personnellement, je trouve que généralement c'est plus souple et facile à faire que de le faire dans Access.
Notamment si tu intègre des graphiques ou que tu as des resultats qui ne tiennent pas dans un écran standard ... Il n'y a pas de zoom sur un formulaire d'Access semblable à ce que Excel propose pour ses feuilles.

A+

[Pierre Dumas]

Bonjour marot_r et le forum

Bonjour.

Pour la requête croisée dynamique tu peux peut-être quand même t'en servir comme source dans un sous-formulaire que tu mets dans l'entête de ton formulaire en utilisant la mise en forme conditionnelle pour tes couleurs et autre.
Mais ce n'est pas forcément la plus adaptée à ton besoin.

Je confirme que ce n'est pas adapté à mon cas à cause des contraintes de mise en forme

Pour l'affichage tu peux mettre dans la source de ton contrôle quelque chose comme : =DFirst("TonChamp", "TaRequetePourTotaux", "Site=""AAA""").
Généralement Access est plus rapide si il lit les données depuis une requête que si on utilise les fonctions de domaine.

Si je ne m'abuse, il s'agit bien d'une fonction de domaine qui va lire les informations dans une requête.
Je viens d'essayer et cela revient au même qu'avec un SomDom (mais c'est plus juste puisque je n'ai qu'une seule ligne par site).

Et, si tes totaux ne sont pas mis à jour dynamiquement quand tu les regardes, tu peux aussi envisager de mettre les totaux dans une table temporaire et afficher depuis cette table temporaire.
Là l'affichage sera instantané (ou presque) une fois les totaux faits.
Attention de bien s'assurer que la table soit à jour avant l'affichage.

A+

Malheureusement si. Les totaux doivent être mis à jour dynamiquement.
En fait on change les données plusieurs fois par jour et on vérifie en permanence par rapport à l'objectif qui est mis à jour plusieurs fois par jour (car il s'affine au fur et à mesure que l'on s'en approche).

Je réitère la question que j'avais posé dans mon dernier post.
Est-ce que l'on peut afficher dans une zone de texte le résultat d'une requête (qui n'aurait qu'une ligne et qu'une colonne) ?
J'ai essayé de plein de façons, car cela semble possible d'après l'aide de MS, mais je n'ai pas trouvé comment changer la source d'une zone de texte pour lui indiquer de prendre le résultat d'une requête.

Dans l'attente de l'idée qui débloquera la situation, je souhaite une bonne après-midi à chacun (sous la pluie).

Pierre Dumas

[hyperion13]

Salut,

...
Est-ce que l'on peut afficher dans une zone de texte le résultat d'une requête (qui n'aurait qu'une ligne et qu'une colonne) ?
J'ai essayé de plein de façons, car cela semble possible d'après l'aide de MS, mais je n'ai pas trouvé comment changer la source d'une zone de texte pour lui indiquer de prendre le résultat d'une requête...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Form_Current()
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Dim strSql As String
 
strSql = "SELECT id_fact" _
& " FROM tblFacture" _
& " WHERE id_fact = 10248"
 
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset(strSql, dbOpenDynaset)
 
Me.Texte0 = rst.Fields("id_fact").Value
End Sub

[tee_grandbois]

bonsoir,
je ne sais pas si c'est la solution mais as-tu essayé d'inclure la requête RObjectifs dans RPlanning avec une jointure gauche vers RObjectifs par le champ Site (pour afficher tout de RPlanning ) ?
Les fonctions de domaine ne semblent pas bénéficier de l'optimisation du moteur JET (selon denis hulo)
vérifie aussi si tu as des index sur les champs impactés par tes regroupements

Je réitère la question que j'avais posé dans mon dernier post.
Est-ce que l'on peut afficher dans une zone de texte le résultat d'une requête (qui n'aurait qu'une ligne et qu'une colonne) ?

oui, mais seulement avec les fonctions de domaine (comme tu l'as fait)
ou par un Recordset (donc VBA)

je souhaite une bonne après-midi à chacun (sous la pluie).

euh! merci, mais non, il y a un superbe soleil en Normandie

[tee_grandbois]

bonsoir hyperion13 et Pierre Dumas,
du coup, la solution d'hyperion13 peut être plus efficace si on parcourt tous les enregistrements:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Form_Current()
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
 
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("RObjectifs", dbOpenSnapshot)
Do Until rst.EOF 
    select case rst.Fields("Site")
        Case "AAA" : Me.Texte0 = rst.Fields("[SommeDeIndicateur1]")
        Case "BBB" : Me.Texte1 = rst.Fields("[SommeDeIndicateur2]")
       'Case etc.
    End Select
loop
dbs.close : set dbs = nothing
rst.close: set rst = nothing
End Sub

PS: la lenteur est due à la fonction de domaine qui s'exécute 30 fois

[Pierre Dumas]

Bonsoir

Merci tee_grandbois et hyperion13 pour les suggestions.

bonsoir,
je ne sais pas si c'est la solution mais as-tu essayé d'inclure la requête RObjectifs dans RPlanning avec une jointure gauche vers RObjectifs par le champ Site (pour afficher tout de RPlanning ) ?

J'y ai bien pensé, mais le total par indicateur de la RObjectifs se retrouvera sur plusieurs lignes de la RPlanning. Je ne pourrai donc plus le récupérer pour les mettre dans mes zones de texte de l'entête. Surtout que le nombre de lignes par site (côté RPlanning) peut être différent, mais aussi qu'il peut ne pas y avoir de sites dans RPlanning, alors qu'il y a des objectifs à afficher quand même.

[...]
vérifie aussi si tu as des index sur les champs impactés par tes regroupements

C'est à dire ? Il vaut mieux qu'il y ait des champs indexés ou pas dans les regroupements ?

J'ai vu tous ces messages sur un ancien fil et, pour l'instant, j'ai retenu la technique avec des listes déroulantes (basées sur la RObjectifs), puis des zones de texte récupérant la valeur de ces listes déroulantes.
Cette méthode a comme inconvénient de doubler les champs, mais est beaucoup plus rapide pour afficher les indicateurs.

Je laisse encore ouvert le fil.

Bonne soirée et merci encore aux participants.

Pierre Dumas

Merci encore et bonne soirée.

[tee_grandbois]

C'est à dire ? Il vaut mieux qu'il y ait des champs indexés ou pas dans les regroupements ?

un index accélère le traitement c'est un gain de temps de traitement quand il y a un volume important d'enregistrements. On privilégiera les champs les plus sollicités dans les tris, les regroupements, les critères ... Il faut juste ne pas trop en abuser, cela prend de la place dans la base.

j'ai retenu la technique avec des listes déroulantes (basées sur la RObjectifs), puis des zones de texte récupérant la valeur de ces listes déroulantes.
Cette méthode a comme inconvénient de doubler les champs, mais est beaucoup plus rapide pour afficher les indicateurs.

c'est vrai, je ne me souvenais plus de cette astuce. certes cela double les contrôles (les champs) dans les formulaires ou états mais puisqu'ils seront non visibles, pourquoi s'en priver ?

J'y ai bien pensé, mais le total par indicateur de la RObjectifs se retrouvera sur plusieurs lignes de la RPlanning.

cela n'a aucune importance c'est juste une colonne dupliquée, elle n'apparaitra qu'une seule fois dans l’entête

[Pierre Dumas]

Oups, j'ai oublié de remercier tee_grandbois, hyperion13 et marot_r pour ces échanges

Tellement repris à faire le travail que j'ai oublié ici.

Comme indiqué, je suis parti sur la base de couples de contrôles. Le premier en liste déroulante, le second en zone de texte basé sur le premier.

Je pense que cela résistera bien à la montée en charge.

Bonne fin de semaine à chacun

Pierre Dumas