Сохранить в PDF с именем листа + имя из ячейки

RSS

Roman_MSK

Пользователь

Сообщений: 11 Регистрация: 30.01.2020

14.09.2020 11:19:23

Добрый день

помогите пожалуйста, не могу разобраться:

Код

Sub SavePDF()
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
        wb.Path & s.Name & s.Range("E1") & ".pdf", Quality:= _
        xlQualityMinimum, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=False
End Sub

Статьи на сайте я читал по этой теме, по ним и сделал макрос, но не могу понять что не так - не работает он, выдает ошибку #424
Смысл макроса, при нажатие на кнопку активный лист сохраняется в PDF, этот файл имеет имя "активный лист + значение из ячейки Е1"

vikttur

Пользователь

Сообщений: 47199 Регистрация: 15.09.2012

14.09.2020 11:26:44

Ошибка о том, что попытки VBA определить объект не увенчались успехом.

Цитата
wb.Path & s.Name & s.Range("E1") & ".pdf"

Возможные причины:
- в пути между папками или именем папки и именем файла отсутствует слэш;
- некорректное имя файла (недопустимые символы).
s.Range("E1").Value - лучше явно прописывать, что хотите получить значение

Roman_MSK Пользователь Сообщений: 11 Регистрация: 30.01.2020	#3 14.09.2020 11:33:19 не понимаю ), можно откорректировать? Что то завис )

vikttur Пользователь Сообщений: 47199 Регистрация: 15.09.2012	#4 14.09.2020 11:52:58 Что откорректировать? Ехать к Вам смотреть файлы? Вы даже значения переменных не показываете... Например, wb.Path без слэша справа - не будет разделителя между имемем папки и именем файла