diggerdidoodar
Board Regular
- Joined
- May 20, 2002
- Messages
- 59
I have four charts that I need to export to a pdf file which then runs on a monitor using Samsung MagicInfo (Only seems to work with PDF format)
This is my VBA below but the issue I have is that the pdf then has a large border/margin around each graph, can I reduce these margins via vba?
Sub pdf()
ThisWorkbook.Sheets(Array("Current MonthNew", "Next MonthNew", "Next Month+1New", "Next Month+2New")).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
"\\ukd1nas01.renold.local\MagicInfo\Orderbook By DayV1.pdf", Quality:=xlQualityStandard, IncludeDocProperties:=False, _
IgnorePrintAreas:=True, OpenAfterPublish:=False
End Sub
This is my VBA below but the issue I have is that the pdf then has a large border/margin around each graph, can I reduce these margins via vba?
Sub pdf()
ThisWorkbook.Sheets(Array("Current MonthNew", "Next MonthNew", "Next Month+1New", "Next Month+2New")).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
"\\ukd1nas01.renold.local\MagicInfo\Orderbook By DayV1.pdf", Quality:=xlQualityStandard, IncludeDocProperties:=False, _
IgnorePrintAreas:=True, OpenAfterPublish:=False
End Sub