Sous Access 2000, j'ai un état avec deux sous-états. Est-il possible de
définir par une propriété ou du code VBA que si les deux sous-états ne
tiennent pas sur une page, un saut de page est inséré entre les deux
sous-états ?
Merci de votre aide car je sèche depuis un bon moment...
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer) If Pages > 1 Then Me.Saut_de_page1.Visible = False else Me.Saut_de_page1.Visible = True End If End Sub
le saut de page inconditionnel n'étant plus visible, en page 1 il ne devrait pas y avoir le saut. dans vba la propriété visible n'est pas proposée mais ça marche. -- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Fabrice" a écrit dans le message de news:
Bonjour Raymond,
Je suis d'accord pour le saut de page, mais si l'état (contenant les deux sous-états) tient sur une page, le saut de page se ferait quand même. Le but étant que le saut de page soit actif seulement si l'état fait plus d'une
page.
Je chercher... je cherche...
En tout cas merci pour tes réponses
Bonjour.
essaie de mettre ceci:
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
If Pages > 1 Then
Me.Saut_de_page1.Visible = False
else
Me.Saut_de_page1.Visible = True
End If
End Sub
le saut de page inconditionnel n'étant plus visible, en page 1 il ne devrait
pas y avoir le saut. dans vba la propriété visible n'est pas proposée mais
ça marche.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Fabrice" <zekkk@hotmail.com> a écrit dans le message de
news:3f67ee1c_3@news.bluewin.ch...
Bonjour Raymond,
Je suis d'accord pour le saut de page, mais si l'état (contenant les deux
sous-états) tient sur une page, le saut de page se ferait quand même. Le
but étant que le saut de page soit actif seulement si l'état fait plus
d'une
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer) If Pages > 1 Then Me.Saut_de_page1.Visible = False else Me.Saut_de_page1.Visible = True End If End Sub
le saut de page inconditionnel n'étant plus visible, en page 1 il ne devrait pas y avoir le saut. dans vba la propriété visible n'est pas proposée mais ça marche. -- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Fabrice" a écrit dans le message de news:
Bonjour Raymond,
Je suis d'accord pour le saut de page, mais si l'état (contenant les deux sous-états) tient sur une page, le saut de page se ferait quand même. Le but étant que le saut de page soit actif seulement si l'état fait plus d'une
page.
Je chercher... je cherche...
En tout cas merci pour tes réponses
Fabrice
Excuse-moi de ne pas t'avoir répondu plus vite, mais j'étais absent.
C'est génial, ta solution marche nickel. Tu m'enlèves une belle épine du pieds.
Encore merci et bonne journée Fabrice
"Raymond" a écrit dans le message de news:ePw$%
Bonjour.
essaie de mettre ceci:
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer) If Pages > 1 Then Me.Saut_de_page1.Visible = False else Me.Saut_de_page1.Visible = True End If End Sub
le saut de page inconditionnel n'étant plus visible, en page 1 il ne devrait
pas y avoir le saut. dans vba la propriété visible n'est pas proposée mais ça marche. -- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Fabrice" a écrit dans le message de news:
Bonjour Raymond,
Je suis d'accord pour le saut de page, mais si l'état (contenant les deux
sous-états) tient sur une page, le saut de page se ferait quand même. Le
but étant que le saut de page soit actif seulement si l'état fait plus d'une
page.
Je chercher... je cherche...
En tout cas merci pour tes réponses
Excuse-moi de ne pas t'avoir répondu plus vite, mais j'étais absent.
C'est génial, ta solution marche nickel. Tu m'enlèves une belle épine du
pieds.
Encore merci et bonne journée
Fabrice
"Raymond" <Raymond.seneque@free.fr> a écrit dans le message de
news:ePw$%23HOfDHA.2576@TK2MSFTNGP11.phx.gbl...
Bonjour.
essaie de mettre ceci:
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
If Pages > 1 Then
Me.Saut_de_page1.Visible = False
else
Me.Saut_de_page1.Visible = True
End If
End Sub
le saut de page inconditionnel n'étant plus visible, en page 1 il ne
devrait
pas y avoir le saut. dans vba la propriété visible n'est pas proposée mais
ça marche.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Fabrice" <zekkk@hotmail.com> a écrit dans le message de
news:3f67ee1c_3@news.bluewin.ch...
Bonjour Raymond,
Je suis d'accord pour le saut de page, mais si l'état (contenant les
deux
sous-états) tient sur une page, le saut de page se ferait quand même.
Le
but étant que le saut de page soit actif seulement si l'état fait plus
d'une
Excuse-moi de ne pas t'avoir répondu plus vite, mais j'étais absent.
C'est génial, ta solution marche nickel. Tu m'enlèves une belle épine du pieds.
Encore merci et bonne journée Fabrice
"Raymond" a écrit dans le message de news:ePw$%
Bonjour.
essaie de mettre ceci:
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer) If Pages > 1 Then Me.Saut_de_page1.Visible = False else Me.Saut_de_page1.Visible = True End If End Sub
le saut de page inconditionnel n'étant plus visible, en page 1 il ne devrait
pas y avoir le saut. dans vba la propriété visible n'est pas proposée mais ça marche. -- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Fabrice" a écrit dans le message de news:
Bonjour Raymond,
Je suis d'accord pour le saut de page, mais si l'état (contenant les deux
sous-états) tient sur une page, le saut de page se ferait quand même. Le
but étant que le saut de page soit actif seulement si l'état fait plus d'une
