Работа с базой данных для отслеживания запасов и создания прогнозов использования и запасов.
Одна из необходимых функций - экспорт полного отчета в формате PDF. Я создал рабочую таблицу со всеми необходимыми диаграммами и информацией, и это рабочая таблица, которую я экспортирую.
Другая необходимая функция - отображение диаграмм в пользовательской форме.
Этот бит загружает график в пользовательскую форму. Я должен был активировать его, в противном случае экспортированный файл был пустым. Я предполагаю, что это потому, что Excel не рисовал диаграмму, поскольку ее не было на видимом листе.
ActiveWorkbook.RefreshAll
Sheets("StatisticsPDF").ChartObjects(3).Activate
Set MyChart = Sheets("StatisticsPDF").ChartObjects(3).Chart
MyChart.ChartStyle = 209
Fname = ThisWorkbook.Path & "\temp1.bmp"
MyChart.Export filename:=Fname, FilterName:="bmp"
MyChart.ChartStyle = 201
Me.Image2.Picture = LoadPicture(Fname)
Worksheets("Main").Activate
Это мой экспорт в формате PDF. Если я открою рабочую книгу свежим и сразу же экспортирую, она будет работать как положено.
Set pdf = Worksheets("StatisticsPDF")
pdf.Visible = xlSheetVisible
fileSaveName = ThisWorkbook.Path & "\Reports\Stationary Report - " & Format(Now(), "DD-MM-YYYY hhmmss")
pdf.ExportAsFixedFormat Type:=xlTypePDF, filename:=fileSaveName, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
pdf.Visible = xlSheetVeryHidden
Однако, если я загружаю одну из диаграмм в пользовательскую форму, а затем пытаюсь экспортировать лист в формате PDF, экспортированный файл включает в себя только диаграмму, а не весь лист. Сначала я попытался активировать рабочий лист, но, похоже, это не имеет значения.