Discussion :

[alp developpement]

Bonjour
j'ai créé un état comportant plusieurs sous états. L'état principal est basé une une raquette ne donnant qu'un seul enregistrement. Les sous état donnes tous les enregistrements lié à celui de l'état principal. Jusque là assez classique. chaque sous état peuvent être vides alors que d'autres avoir des donnée. L'état principal ne peux jamais être vide. Chaque sous état fait qq mm en mode création et sont auto extensible et réductible.

Pour chaque sous état, j'ai travaillé la mise en page et mis un événement sur sans donnée. Si j'ouvre seul le sous état, pas de problème tout fonctionne. Mais lorsque j'ouvre l'état principale, l’événement ne s'applique plus à mes sous état ou alors il ne considère plus qu'ils n'ont pas de données. il m'affiche l'entête du sous état et un ligne vides.

Mon événement consiste à afficher ou non des parties du sous état.

Quelqu'un sait il d'où vient le problème et comment le résoudre ?
Merci d'avance

[tee_grandbois]

bonsoir,
un état perd certaines propriétés et évènements lorsqu'il est utilisé en tant que sous état.
Il existe une solution en testant la propriété CurrentRecord du sous-état, si elle est égale à 0, on peut rendre invisible le sous-état.
Si les sous-états sont dans la section Détail de l'état principal, il suffit de tous les tester comme cela:

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
Private Sub Détail_Print(Cancel As Integer, PrintCount As Integer)
 
If Me.SousEtat1.Report.CurrentRecord = 0 Then
    Me.SousEtat1.Report.Visible = False
Else
    Me.SousEtat1.Report.Visible = True
End If
 
If Me.SousEtat2.Report.CurrentRecord = 0 Then
    Me.SousEtat2.Report.Visible = False
Else
    Me.SousEtat2.Report.Visible = True
End If
...
End Sub

[alp developpement]

Bonjour
Merci pour ta réponse
par contre je ne veux pas imprimer mon état mais l'afficher, du coup j'ai mis ton code dans "sur chargement"

mon problème s'est que le test ne fonctionne pas. J'ai mis des actions messages pour tester et il considère tout le tant que le sous formulaire est vide qu'il le soit vraiment ou pas

Cela vient-il du fait que je l'ai mis sur chargement ? ou cette ligne comporte -elle une erreur ? If Me.E-D3.Report.CurrentRecord = 0

Merci encore

[tee_grandbois]

bonjour,

par contre je ne veux pas imprimer mon état mais l'afficher, du coup j'ai mis ton code dans "sur chargement"

au chargement, c'est trop tôt, il ne faut pas changer les évènements que l'on te propose.
Impression ou aperçu avant impression, c'est la même chose, il n'y a que le support qui change, il faut laisser le code sur impression ou éventuellement au formatage

cette ligne comporte -elle une erreur ? If Me.E-D3.Report.CurrentRecord = 0

oui et non, le soucis c'est le nom que tu as donné à l'état : il contient un caractère réservé, le tiret: -
il est préférable d'éviter ce genre de caractères, car cela oblige à mettre des crochets :

Code :

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

If Me.[E-D3].Report.CurrentRecord = 0

[alp developpement]

Tout d'abord merci
Ensuite j'ai fait une erreur c'est E_D3 je ne sais pas si il faut aussi mettre des crochets
Sinon j'ai fini par enregistrer en tant que requête les données qui me permettait d'alimenter mes Etats, puis je fais un comptage des enregistrement dans la requête, quand c'est 0 j'affiche pas quand c'est différent de zéro j'affiche. J'ai contourné le problème, mais j'essaierai les crochets car les requête rendent un peu l=plus lourde ma base
encore merci
je mets comme résolu

[alp developpement]

Bonjour
je réactive ce fil de discussion car j'ai un nouveaux un pb avec cet état. Quand j'ouvre l'état pas de pb , le code fonctionne et s'affiche seulement ce que je lui demande. Mais si je demande depuis un formulaire d'envoyer l'état par mail avec la fonction envoyerobjetdelabasededonnées alors il me met l'état en format pdf en pièce jointe d'un mail, mais le code interne à l'état (qui est sur activation et chargement) ne s'applique pas

ou pourrais je mettre ce code pour qu'il soit pris en compte dans ce cas là

Merci d'avance

[hyperion13]

Salut,
Dans chacun de tes sous-états copier ce qui suit :

Code :

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

1
2
3
Private Sub Report_NoData(Cancel As Integer)
    Cancel = True
End Sub

Dans ton état principal, tu sélectionnes chacun de tes sous-états et tu mets "Oui" pour les propriétés "Autoextensible" et "Autoréductible" et 0 (zéro) pour hauteur.

[tee_grandbois]

bonjour,

mais le code interne à l'état (qui est sur activation et chargement) ne s'applique pas

S'agit-il bien du code l'état et pas les sous-états ?
Peux-tu poster le code de ces 2 évènements ?

[alp developpement]

Bonjour
oui c'est bien des codes dans l'état
j'ai trouver la solution, j'ai ajouter dans ma macro ouvrir l'état avant envoyer élément de la base et là ça marche

Merci quand même pour ta réponse