Добрый вечер, помогите с решением задачи, есть книга excel (версия Excel 2019) с данными, и 5-ю листами, нужен макрос экспорта в PDF определенных листов (например 3,4,5), так же чтобы имя для книги брал из определенной ячейки (т.к. даты разные), на просторах интернета нашел следующий код:
| Код |
|---|
'Объявление переменных
Dim CellValue As String
Dim Path As String
Dim FinalFileName As String
'Временно отключаем показ вспомогательных сообщений
Application.DisplayAlerts = False
'Путь сохранения файла
Path = "C:\Users\alexa\Desktop\Report\"
'№ ячейки для присвоения имени
CellValue = Range("C12")
'Формируем итоговый путь и название файла
FinalFileName = Path & CellValue
'Сохраняем файл
ActiveWorkbook.SaveAs Filename:=FinalFileName, _
FileFormat:=xlOpenXMLWorkbook
'Включаем вывод сообщений
Application.DisplayAlerts = True
'Сообщение с результатом выполнения процедуры
MsgBox "Файл успешно сохранен с названием - " & CellValue, vbInformation, "Результат"
|
Единственное, что понял так это то, что данный макрос сохраняет файл в формате .xlsx с именем из заданной ячейки, смог поменять путь сохранения, и собственно указать ячейку, а что дальше ума не приложу т.к. далек от темы.
Уважаемые форумчане, помогите пожалуйста с данным вопросом.
