Ik ben bezig met een project en nu heb ik een vraag.
Ik heb de volgende code.
Nu wil ik de optie erin hebben zoals ik ook kan kiezen in de proporties van de printer namelijk "Alle rijen passend maken voor 1 pagina"
Wat ik in de pdf zet is namelijk altijd gelijk en het ziet er mooier uit als alles op 1 blad staat en niet op 2 bladen zoals nu dat de data word onderbroken over 2 bladen. Ik heb gemerkt dat de printer instellingen wel reageren op staand of liggend bijvoorbeeld maar dus niet op passend maken. Hoe pak ik dat aan in Vba ?
Ik heb de volgende code.
Code:
c01 = "E:\Temp\Week " & Format(c00, "00") & ".pdf"
Blad5.UsedRange.ExportAsFixedFormat 0, c01
End If
With CreateObject("outlook.application").createitem(0)
.Subject = "Planning week " & c00
.to = "iemandanders@gmail.com"
.attachments.Add c01Nu wil ik de optie erin hebben zoals ik ook kan kiezen in de proporties van de printer namelijk "Alle rijen passend maken voor 1 pagina"
Wat ik in de pdf zet is namelijk altijd gelijk en het ziet er mooier uit als alles op 1 blad staat en niet op 2 bladen zoals nu dat de data word onderbroken over 2 bladen. Ik heb gemerkt dat de printer instellingen wel reageren op staand of liggend bijvoorbeeld maar dus niet op passend maken. Hoe pak ik dat aan in Vba ?
Bedankt voor je hulp. :thumb:
