Ошибка VBA во время выполнения '5' неверный вызов процедуры или аргумент, представляющий проблему на определенных компьютерах при создании PDF-файла с VBA - PullRequest
0 голосов
/ 10 октября 2018

Я создал кнопку ActiveX в Excel, которая должна создавать PDF-документ на рабочем столе пользователя:

Private Sub CommandButton1_Click()
'file name as a cell value
Dim flenm As Range
'path to the users desktop
Dim desktoppath As String

Set flenm = Sheet1.Range("D21")
desktoppath = CreateObject("WScript.Shell").specialfolders("Desktop")


' pdf creation
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=desktoppath & "\" & _
flenm & ".pdf", OpenAfterPublish:=True


' confirmation
MsgBox ("The PDF should be saved on your desktop as '" & flenm & ".pdf'." & vbNewLine _
& " If you have issues with this, please let me know." & vbNewLine _
& " Save Location: " & desktoppath)
End Sub

Она отлично работает на моем компьютере (Windows 7, Excel 2007, не администратор) ина одном из компьютеров моего коллеги (Windows 10, Excel 2016, администратор), но, кроме этого, на всех других машинах, которые я тестировал (все Windows 7, Excel 2007, не администратор), он выдает ошибку времени выполнения '5 ': недопустимая процедура.

Я не могу понять, в чем проблема.Может ли это быть связано с наличием другого программного обеспечения PDF или с разрешениями (хотя мы пытались установить их все одинаково) или просто с ошибкой в ​​коде?

Во всяком случае, если у кого-то есть идеи, я хотел бы услышать.Если требуется дополнительная информация, просто спросите.

1 Ответ

0 голосов
/ 10 октября 2018

Мне по какой-то причине не разрешено отвечать на мой собственный вопрос (мне также не разрешали редактировать мой ответ).

Я нашел ответ на основании предоставленных предложений.Проблема была в отсутствии этого;

http://www.microsoft.com/en-gb/download/details.aspx?id=7

на компьютерах конечных пользователей.Мы проверили его сейчас, и он отлично работает.

...