Discussion :

[dgeo10]

Bonsoir à tous
Pour ceux qui m'on suivi depuis le début j'ai fini mon programme pour mon activité
J'ai crée un bouton pour imprimer mon UserForm
Mais j'aimerais avoir sur un autre bouton la possibilité d'enregistrer l'UserForm actif en PDF ou même en jpeg si c'est plus simple.
J'ai essayer les quelques code que j'ai trouver sur le net et malheureusement rien ne fonctionne :/

Merci à vous

UserForm à enregistrer = UserForm3

[kiki29]

Salut, va voir :
PDFCreator Sauver une UserForm en PDF
Excel 2007 Sauver une UserForm en PDF
ainsi que :
Excel 2007+ : Sauvegarde UserForm en Pdf
Excel 2003 PDFCreator 1.7.3 : Sauvegarde UserForm en Pdf

[dgeo10]

Merci,
Code essayer sa fonctionne +/- mais la qualité du PDF est vraiment médiocre, même pas centrer ...
j'ai essayer plusieurs choses sa change rien,
du coup j'ai recrée une visualisation de mes facture sur excel même sans passer par l'UserForm
et avec le code suivant il m'enregistre en PDF de la bonne dimensions et de bonne qualité

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub CommandButton1_Click()
 
Sheets("Vision Facture").Activate
ActiveSheet.Cells(6, 13).Value = UserForm2.TextBox100
 
Worksheets("Vision Facture").Range("B2:J50").ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:="C:\Users\Geoffrey\Desktop\RapportTest.pdf", _
    Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, _
    IgnorePrintAreas:=False, _
    OpenAfterPublish:=False
    Unload Me
 
    End Sub

Est ce possible de modifier le chemin et que le nom du fichier soit le n° de la Facture / ou devis qui se situe :
en M6 sur la feuille : Vision Facture ?

Merci

[patricktoulon]

pour la qualité tu n'y peux rien
je supose que tu copycolle ton userform dans un sheets puis export en pdf
probleme deja le copy c'est boff mais en plus le collage sur sheet reduit encore la qualité

tu a la fonstion printform si tu a une imprimante virtuelle pdfcreator ou mcrosoft pdf prinr ou bullzip pdfprinter ou autres
memorise l'imprimante active pour le classeur actuel change la avec activeprinter="......." et fait ton printform
la qualité s'en ressentira

PS: si tu est sur Windows 10 tu a forcement microsoft pdf printer a moins que tu l'ai supprimer ou deactivé