Discussion :

[jmde]

Bonjour,

Je voudrais éditer mon état en faisant un saut de page après les lettres
"C", "G", et "M".

Sur l’Entête de groupe un saut de page avant section et une zone de texte txtNomAlpha :

Code :

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

=Gauche([tbl Adhérents.NomAdhérent];1)

Sur la zone Détail au formatage :

Code :

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

1
2
3
4
5
6
7
8
9
10
Select Case [txtLettreAlpha]
   Case "C"
        Me.Détail.ForceNewPage = 1
   Case "G"
        Me.Détail.ForceNewPage = 1
   Case "M"
        Me.Détail.ForceNewPage = 1
   Case Else
        Me.Détail.ForceNewPage = 0
 End Select

Pour "ABC" les enregistrements se suivent bien, mais pour "C" chaque enregistrement
s’édite sur une page.

Merci pour votre aide

Salutations

[Gabout]

Bonjour,

A défaut d'une réponse, une idée :

Sur la zone Détail au formatage :

Pourquoi ne pas essayer le gérer ton saut de page dans un regroupement ?

[jmde]

Bonjour Gabout,

Ok, mais peux-tu me donner une piste car vraiment je ne vois pas comment faire.

Salutations

[Jeannot45]

Comme te le dit Gabout, en faisant un regroupement dans ton état, tu pourras dans les propriétés de celui-ci :
indiquer l'intervalle de regroupement (ici, le premier caractère de ton champ)
Gérer le saut de page (En mode création, Affiche les proprités du pied de groupe et dans l'onglet format, tu trouveras : Saut de Page)

Pour créer un état avec des regroupements, regarde ici

[jmde]

Bonjour,

Merci pour vos réponses

Voici mon code qui fonctionne il suffisait de remplacer
Me.détail par Me.PiedGroupe0.

Code :

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

1
2
3
4
5
6
7
8
9
10
Select Case [txtLettreAlpha]
  Case "C"
     Me.PiedGroupe0.ForceNewPage = 2
  Case "G"
     Me.PiedGroupe0.ForceNewPage = 2
  Case "M"
     Me.PiedGroupe0.ForceNewPage = 2
  Case Else
Me.PiedGroupe0.ForceNewPage = 0
End Select

Salutations