stopper les sauts de pageRésolu

Question

bonjour tous,


voil&#224;, j'expose mon probl&#232;me, je suis tr&#233;sorier d'une soci&#233;t&#233; folklorique et je voudrais sur une imprimante matricielle imprimer des ticket (genre ticket de caisse), tous se passe bien, pr&#233;sentation tr&#232;s correcte, mais bien que cette vielle imprimante soit pr&#233;vue pour &#233;diter des tickets, je n'arrive pas &#224; &#233;viter les saut de pages, de plus, mes codes VBA (je suis plus que d&#233;butant) me parraissent un peu lourd, je pense que certaines boucle pourraient l'all&#233;ger. Mon plus gros probl&#232;me &#233;tant les sauts de page, je vous soumets mon code  d'impression et de suppression de ligne 'vide' .  J'ai une ligne TOTAL et je voudrais que l'imprimante s'arr&#234;te apr&#232;s 3 interlignes


Merci


' Impression ticket enregistr&#233; le 10/03/2005 
' suppression des lignes inutiles enregistr&#233; le 30/05/05 


Feuil5.Activate
With Feuil5.Range("b5:d21").Select
For x = 5 To 21
If Feuil5.Cells(x, 3).Value = 0 Then
Feuil5.Rows(x).EntireRow.Hidden = True
Else
Feuil5.Rows(x).EntireRow.Hidden = False
End If
Next
End With
ActiveSheet.PrintOut
ActiveSheet.Rows.EntireRow.Hidden = False

je suis asser impatien de lire vos soluces, je me d&#233;brouillait  pas mal du temps du basic (10,  20  30  )mais l&#224; en VBA, je patauge un peu, m&#234;me si apr&#232;s avoir trouv&#233; la soluce je trouve &#231;a &#233;vident, l&#224; je gamberge vraiment.  Merci encore de vos proposition

koolman61 · Accepted Answer

Pas de solution trouvée.  Sociéte a stoppé ses activité. Sujet abandonné.

Stopper les sauts de page

1 réponse

Discussions similaires