Discussion :

[grisan29]

bonjour le forum

comment faire pour que les colonnes A à P puisse etre pris en compte lorsque je clic sur saut de page et saute a partir de la ligne 70 et que ce saut soit répéter a partir de chaque fois que la page arrive a la ligne"70"'(140)

et aussi comment faire pour que des ajouts de ligne automatique puisse repousser des lignes qui se trouvent apres

merci pour votre compréhension

cordialement

Pascal

[patricktoulon]

bonjour grizan



j'ai essayé ca mais apparament il n'autorise que 50 lignes

Code :

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

1
2
3
4
5
6
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Row = 70 Or Selection.Row = 140 Or Selection.Row = 210 Then
ActiveWindow.SelectedSheets.HPageBreaks.Add after:=ActiveCell
End If
End Sub

je vais chercher encore
au plaisir

[grisan29]

bonjour patricktoulon

ce que j'ai demander rentre en compte sur mon fichier car je ne sais pas comment faire pour que le code function ligne suivante du module3 puise etre modifié afin de créer des pages dans la feuille facturation plutot que des feuilles
donc j'essai sans succes les sauts de pages

merci beaucoup Patrick

cordialement

Pascal

[AlainTech]

Il me semble que tu essayes de brûler les étapes.
Tu ne t'en es pas encore sorti de la génération de ton fichier que tu veux déjà aller à sa mise en pages.
Tu n'essayerais pas d'en finir avec ton autre discussion pour qu'on puisse avancer sur du concret?

[patricktoulon]

bonjour grizan et Alain tech

effectivement Alain a raison tant que ta page n'est pas rempli entièrement tu ne peut pas faire des saut de pages

a moins que tu cherche a faire un gabarit en particulier mais tu va rencontrer un problème avec les entêtes et les pieds de page a la fin
enfin essai d'envoyer un exemple de facture avec donc plusieurs page pour que je puisse comprendre un peu mieux j'ai une idée mais il me faut plus de précision

mon idée:

ajouter un sheets dans le quel tu va préparer les entêtes et les pieds de page c'est tout

ensuite

lors du remplissage de la facture
a l'activate et avec un variable booleenne copier l'entête et le faire qu'une seule fois la boolenne serai la pour s'en assurer

dans le sélection change du sheet


if selection .row=71 or selection .row=141 or selection .row=211then 'ect....
'quand le row arrive a 71 ou 141 ou 211 ect....

copier le pied de page et le coller dans la facture
sauter une ligne
copier l'entête et le coller
selection.offset(+1,0).select
et ainsi de suite


voila
au plaisir

[grisan29]

bonjour patricktoulon et Alain tech

merci de vos réponse, comme vous me le dites je vous joints un exemple de ce que je voudrais mais cela est aléatoir car ne sachant jamais a l'avance le nombre de lignes a écrire
l'exemple joint est composé de 2 pages et demi

cordialement

Pascal