Excel VBA для Mac: сохранить рабочий лист в формате PDF

Я фактически работаю над простым макросом, чтобы сохранить активный лист в виде файла PDF со специальным именем. Созданный мной макрос работает, но он сохраняет все листы в нескольких файлах PDF и помещает имя листа в конец имени файла.

Если бы вы могли мне помочь, было бы здорово, я не понимаю, в чем проблема …

Вот мой макрос:

Sub PrintPDF() Dim wksSheet As Worksheet Dim strFile As String Set wksSheet = ActiveSheet 'strFile = Format(Now(), "yyyymm") _ & ".pdf" strFile = "blabla" _ & "_" _ & Format(Now(), "yyyymm") _ & "_" _ & "name2" _ & " " _ & Replace(Replace(wksSheet.Cells(1, 2).Value, " ", ""), ".", "_") _ & ".pdf" strFile = ThisWorkbook.Path & ":" & strFile wksSheet.SaveAs Filename:=strFile, FileFormat:=xlPDF End Sub 

Вы обнаружили ошибку в Excel Mac 2011 VBA!

Несмотря на использование вашего синтаксиса ActiveSheet.SaveAs или моих предпочтений:

 ActiveWorkbook.SaveAs Filename:=strFile, FileFormat:=xlPDF, PublishOption:=xlSheet 

Excel Mac 2011 VBA всегда сохранит все листы.

Если вы включите Macro Recorder и сохраните лист в PDF, он будет работать так, как ожидалось, и ActiveWorkbook версию ActiveWorkbook в модуль кода. Теперь немедленно заново запустите тот самый код, который он сгенерировал, и он дает другой результат!

Я могу подтвердить, что эта ошибка не существует в Excel Mac 2016 и что синтаксис рабочего листа больше не поддерживается. Вам нужно будет изменить синтаксис книги, включенный выше.

Следующий метод решает проблему

 ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=strFile 
  • EXCEL и создатель PDF в Angularjs
  • Ошибка PDF в Excel при закрытии PDF-файла
  • вставить файл pdf в качестве изображения в данном листе excel
  • Циклируйте номера сотрудников и сохраняйте несколько файлов PDF
  • Как преобразовать файлы .XLS & .XLXS в формат .PDF и вернуть их в каждую исходную подпапку в Powershell?
  • Скопируйте первую страницу pdf, чтобы преуспеть с помощью Sendkeys
  • Как экспортировать данные из ListView в Excel и PDF (VBA)
  • Не удалось сохранить PDF-файлы из Excel / VBA на одном компьютере
  • VBA, установите тайм-аут в Excel на AcroExch.App, используя автоматизацию OLE
  • Сохранить файл Excel в формате PDF для определенного пути
  • Объедините PDF из книги и добавьте еще один PDF-файл в VBA
  • Interesting Posts

    удаление выбранного диапазона в excel

    Outlook изменяет размеры изображений при вставке из приложения vba excel

    Как использовать Excel-DNA для перебора строк?

    Построить альтернативный диапазон ячеек vba

    Как использовать функцию Excel «= SUMPRODUCT (- ISNUMBER (SEARCH …»), чтобы исключить «сложные составные» результаты?

    Как сохранить правильную информацию в обновляемых текстовых блоках при обновлении сводной таблицы?

    График подсчета Excel каждые 5 строк

    Excel 2013 для отображения только определенных строк на основе одного значения ячейки

    Как добавить адрес электронной почты через подсказку в Excel VBA?

    Есть ли способ для VBA (в Office 2011 для Mac) запускать AppleScript?

    apache poi так медленно читает файл xlsx

    Макрос для создания новых строк в отдельной вкладке, основанной на qty в ячейке

    Ссылка на ячейку в Excel на основе критериев в двух уникальных столбцах

    Использует ли vba в словах и excel другое объявление?

    c # excel форматирует каждую строку в rtf

    Давайте будем гением компьютера.