Bonjour à tous,
Petit souci pour moi, mais certainement solutionné en 5 sec pour vous :
J'ai cette macro :
Mais j'aimerai que l'enregistrement se fasse PDF, cela est-il possible ?
Si oui pouvez vous m'indiquer le code modifié, svp ?
Alors j'ai essayé en mettant juste .pdf à la place de .xlsm mais le lecteur de pdf ne fonctionne pas, pourtant le fichier s'enregistre.
Merci d'avance
Petit souci pour moi, mais certainement solutionné en 5 sec pour vous :
J'ai cette macro :
VB:
Sub animateur()
Dim w As Worksheet
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Sheets(Array("Entrées du soir", "Box Office")).Copy
With ActiveWorkbook
For Each w In .Worksheets
w.UsedRange = w.UsedRange.Value
Next
.SaveAs ThisWorkbook.Path & "\Résultats du jour.xlsm", 52
.Close
End With
End SubMais j'aimerai que l'enregistrement se fasse PDF, cela est-il possible ?
Si oui pouvez vous m'indiquer le code modifié, svp ?
Alors j'ai essayé en mettant juste .pdf à la place de .xlsm mais le lecteur de pdf ne fonctionne pas, pourtant le fichier s'enregistre.
Merci d'avance