Discussion :

[dav787]

Bonjour,

Voilà mon pb :

J’ai un formulaire independant("recherche mensuel") dans lequel se trouve un sous-formulaire("sfrecherchemensuel").
Dans mon formulaire indépendant, j'ai créé 1 groupe d'options nommé "choix3".
Ce dernier me permet de rendre visible ou non, une zone de texte("commentaire_memo") dans mon sous-formulaire sfrecherchemensuel.=>le code fonctionne bien, pas de soucis

Je voudrais ouvrir un état ("Analyse mensuelle ecart") dans lequel se trouve entre autres, un champ que j'ai nommé "comments".
Dans tous les cas, l'utilisateur souhaite ouvrir l'état qu'il y ait ou non des données mais le problème, c'est que si l'utilisateur n'a rien renseigné dans la zone commentaire de mon sous-formulaire je ne veux pas que le champ "comments" dans mon état soit visible ni même son étiquette.
J'ai dans un premier temps crée une procédure évennementielle sur "aucune donnée" avec cet extrait de code en pensant pouvoir gérer cet aspect, mais ça ne marche pas.

Code :

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

1
2
3
4
5
6
7
8
9
 
Dim message As String, dtdebut As Date, dtfin As Date, mo As String, commentaires As string, comments As String
 
commentaires = Forms![recherche mensuel]![sfrecherchemensuel]![commentaire_memo]
 
If IsNull(me.commentaires) Then
  Reports![Analyse mensuelle ecart].[comments].Visible = False
 
End If

Deuxièmement, j'ai crée une procédure évènementielle "sur activation" mais ça ne marche pas non plus, d'autant qu'il faut une petite ligne permettant de gérer le nul de la zone "commentaires_mémo"

Code :

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

1
2
3
4
 
 
Report!Me.comments.Visible = False
Me.etiquette_commentaires.Visible = False

Merci pour votre aide

[marot_r]

Bonjour.

Généralement avec les rapports on travaille avec les événement OnPrint et OnFormat.

Avec un code du type :

Code :

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

1
2
3
if isnull(Forms![recherche mensuel]![sfrecherchemensuel].form![commentaire_memo]) then
   me.comments.visible=false
end if

Dans ton cas, as-tu essayé en mettant la propriété auto-réductible à True ?
Si il n'y a pas d'info, alors Access n'affiche pas le contrôle.
Je ne me souviens plus de ce qu'il fait pour l'étiquette. Il me semble que si elle est liée au contrôle elle disparait aussi.

Sinon, une autre astuce consisterai à mettre le commentaire et son étiquette dans un sous-état basé sur une requête du type :

Code sql :

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

1
2
select [TaTable].[Clef], [TaTable].[commentaire_memo] from [TaTable]
where [TaTable].[commentaire_memo] is not null

Et avec la propriété Auto-Réductible à true, si il n'y a pas de données Access n'affiche pas le sous-état.

A+

[dav787]

Bonjour et désolé pour le retard dans la réponse.

Effectivement, je n'avais pas pensé à la fonction auto-réductible.
Je teste ça, code compris et je redis.

Merci pour l'aide apportée.

[dav787]

Comme convenu, je reviens.

Donc, l'étiquette reste affichée en permanence, mais ça, l'utilisateur m'a dit que finalement, c'était pas important.

Merci et bonne journée