Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Сохранение в PDF с автоматическим назначением имён файлов из ячейки
 
Цитата
antal10 написал:
Может так

1 Sub сохранить()
2 Dim Fname As String
3 Fname = "C:\" & Sheets("ДКП бу").Range("A1").Value
4        ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Fname, _
5        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
6 End Sub
Ваш вариант помог
Скажите, а можно сделать так, чтобы данный макрос запускался на первом листе, а pdf файл создавался со второго листа?
Страницы: 1
Наверх