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

Страницы: 1
Сохранение выбранного листа в формате PDF c выбором пользователем конечной папки хранения
 
Добрый день, помогите, пожалуйста, справиться со следующей задачей.

В файле Excel формируются дашборды по странам, необходимо сохранять лист с дашбордом как pdf  в той же папке, где лежит Excel файл c указанием в названии страны(берется из ячейки I2), типа дашборда и текущей даты.
Знаю, что в Приемах есть статья на эту тему, по мотивам которой я составил вот такой макрос:

Код
Sub SplitSheets6()    Dim AW As Window
     Set AW = ActiveWindow
    For Each s In AW.SelectedSheets
      s.ExportAsFixedFormat Filename:=ThisWorkbook.Path & "\" & s.Range("I2") & "_snapshot (1 page)" & "_" & Date & ".pdf", Type:=xlTypePDF
       Next
End Sub

Данный макрос отлично работает на моем компьютере, но при попытке выполнить его на другом компе вылазит ошибка (прилагается, файл ОШИБКА 1).

Поэтому решил переформулировать задачу: сохранять выделенный лист в формате pdf в папку, определяемую пользователем, c указанием в названии страны(берется из ячейки I2), типа дашборда и текущей даты.
Попробовал переписать код под это дело:

Код
Sub SplitSheets15()    Dim AW As Window
     Set AW = ActiveWindow
    For Each s In AW.SelectedSheets
    s.ExportAsFixedFormat
    Type = xlTypePDF
    Filename = Application.GetSaveAsFilename( _
                 s.Range("I2") & "_snapshot (1 page)" & Date, _
                 "PDF (*.pdf),", , "Please select the appropriate folder to save the snapshot", "Save")
    Quality = xlQualityStandard
    DisplayFileAfterPublish = True
        Next
End Sub

но выдает ошибку  (прилагается, файл ОШИБКА 2)

Помогите поправить код или порекомендуйте, пожалуйста, другой.

Заранее благодарю.
Не работает надстройка PLEX
 
Добрый вечер!  Попытался установить надстройку, следуя всем инструкциям в соответствии с файлом "Справка о надстройке".

При этом после открытия любого файла появляются  ошибки как на приложенных фото. Сначала "permission denied", потом "не удается выполнить макрос" дважды. Вкоалка PLEX отображается стабильно, но при попытке воспользоваться любым из инструментов появляется снова ошибка "не удается выполнить макрос" с названием макроса, соответствующего выбранному инструменту.

На ноутбуке установлена версия 1808 сборка 10730.20088.

Помогите решить данную проблемуб возможно кто-то с ней уже сталкивался.

Заранее благодарю!
Страницы: 1
Наверх