YannC.
XLDnaute Occasionnel
Bonjour à vous tous,
Pour ceux qui sont intérressé, voici un code en VBA pour excel qui permet d'enregistrer au format xps. Ce qui nous permet de ne plus devoir passer par du pdf. Et le format xps est lisible par tous.
Pour ceux qui sont intérressé, voici un code en VBA pour excel qui permet d'enregistrer au format xps. Ce qui nous permet de ne plus devoir passer par du pdf. Et le format xps est lisible par tous.
Sub EnrXPS()
Dim sNomFichierXPS As String
Application.ScreenUpdating = False
Sheets("Nom de votre feuille").Select
sNomFichierXPS = ThisWorkbook.Path & "\" & "Nom de votre fichier.xps"
ActiveSheet.ExportAsFixedFormat Type:=xlTypeXPS, Filename:=sNomFichierXPS _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Application.ScreenUpdating = True
'Sheets("Nom de la feuille par default").Select (si vous voulez retourner sur votre onglet principal)
End Sub