Impression d'un formRésolu

Question

IntelW >:) 
salut, je voudrais imprimer un form où il y a des zones de texte et des lignes.

comment faire pour imprimer le texte sans les zones à leur emplacement exact ?

cs_ITALIA · Accepted Answer

Printer.ScaleMode = 6 oubien VbMillimeters indique l'unité de mesure

Printer.ScaleMode = 6
Printer.PrintQuality = vbPRPQHigh ' Qualité pas obligatoire
Printer.CurrentX = 10 ' Position en X
Printer.CurrentY = 10 ' Position en Y
Printer.Print Text1.text
Printer.CurrentX = 10 ' Position en X
Printer.CurrentY = 20 ' Position en Y
Printer.Print Text2.text
............
.........
.......
......
....
...

l'origine de la feuille est en haut à Gauche

It@li@

cs_ITALIA · Answer

Tu peux essayer :

Private Sub Form_Click ()
   Dim Msg   ' Déclare la variable.
   On Error GoTo ErrorHandler   ' Définit la gestion
                                 ' des erreurs.
   PrintForm   ' Imprime la feuille.
   Exit Sub
ErrorHandler:
   Msg = "Impossible d'imprimer la feuille."
   MsgBox Msg   ' Affiche le message.
   Resume Next
End Sub

It@li@

bremondpierrejean · Answer

IntelW >:) 
ok merci, je vais tenter le coup

a+++++++

bremondpierrejean · Answer

IntelW >:) 
bon, merci quand même, mais le form est imprimé avec le fond et la zone de texte complète
je voudrais juste imprimer le texte des zones localisé là où il est sur le form

cs_ITALIA · Answer

je ne vois pas trop ce que tu veux ...

It@li@

bremondpierrejean · Answer

IntelW >:) 
ok : j'ai sur un form, une vingtaine de zone de texte répartis un peu sous une forme comme un arbre généalogique (x fils de y et z etc...) . je voudrais pouvoir imprimer le tout sous cette forme mais sans que l'on voit la structure de la zone de texte en elle même ...

exemple : 

                                        mr dupont grandpère
                mr dupont père
                                        mme dupont grandmère
mr dupont
                                       etc
               mme dupont
                                       etc...

ce n'est pas évident à expliquer désolé ...

cs_ITALIA · Answer

pourkoi ne pas rendre ce que tu veux invisible avant de lancer mon code et remettre en visible ensuite ???

It@li@

cs_ITALIA · Answer

pour imprimer ce qu'il y a dans un text on peux faire :

Printer.Print Text1.text

It@li@

bremondpierrejean · Answer

IntelW >:) 
bon, je vais essayer printer.print text1.text, reste la localisation sur la feuille

merci

cs_ITALIA · Answer

Facile :

Printer.ScaleMode = 6
Printer.PrintQuality = vbPRPQHigh ' Qualité pas obligatoire
Printer.Font = "Tahoma" ' Police pas obligatoire
Printer.CurrentX = 0 ' Position en X
Printer.CurrentY = 5 ' Position en Y
Printer.FontSize = 10 ' Taille de la Police

apres tu peux mettre  en gras ...souligné...italique........etc etc
It@li@

bremondpierrejean · Answer

IntelW >:) 
merci, je vérifie. J'ai bien l'impression que c'est ça !!!
a++++++++

cs_ITALIA · Answer

coches reponses accepté alors...

Merci

It@li@

bremondpierrejean · Answer

IntelW >:) 
Cela ne marche pas. Je peux imprimer deux textbox l'une sous l'autre mais si je veux faire de la mise en page ...

j'ai beau faire gaffe au scalemode

oups !!! pas doué le gars

nouramiza · Answer

j'aimerais etudier un logiciél pour le secteur de textile qui maîtrise la qualité et le tableau de bord  





nouramiza

Impression d'un form

14 réponses

Discussions similaires