Encore FontTransparent HELP MEEEE Please

Question

A prioris personne n'a trouvé de solution à mon pbm, alors j'en suis desole mais j'insiste.

Une nouvelle précision a vous donne :
      - la propriété FontTransparent fonctionne quand je passe sur la 2eme page.

     - un bout de mon code si besoin.

Printer.ScaleHeight = 210 '                 x
    Printer.ScaleWidth = 297 '                  y
    Printer.Orientation = vbPRORPortrait '      Orientation portrait
    Printer.PaperSize = vbPRPSA4 '              210*297
    Printer.ScaleMode = vbMillimeters '         Unité de mesure
    Printer.Font = "Arial" '                    Police
    Printer.FontTransparent = True '            Permet de ne pas cacher les dessins derrière le texte (donc evite les zones blanches)
    
    NbreMaxFich = NumTotalPage
    DecalV = 0
    DecalPhoto = 0
    
    For NumFiche = 1 To NbreMaxFich
        DecalSpecI = 0
        DecalspecII = 0

        Call SelectionArticles
        Call ImpPaysage
        Call MiseABlanc
    
        Printer.Line (0, (94 + DecalV))-(10, (94 + DecalV))
        Printer.Line (194, (94 + DecalV))-(204, (94 + DecalV))
        DecalV = DecalV + 94
        
        If DecalV = 282 _
            Then
                DecalV = 0
                Printer.NewPage
        End If

N'hesite pas a me contacte si vous avez une soluce.
Par avance merci.
ELP or Help  :question)

cedb002 · Answer

j'ai un pdf pour le printer si tu veux file moi ton mail