VBA работает python скрипт - ошибка разрешения - PullRequest
1 голос
/ 02 августа 2020

Итак, я пытаюсь запустить код Python с помощью VBA. Прочитал много похожих тем здесь, но не смог найти ответа.

Каждый раз, когда я использую приведенный ниже код, CMD сообщает об ошибке разрешения - изображение ниже.

Запуск сценария Python идеально при нажатии вручную.

Есть идеи по этому поводу?

КОД VBA

Dim obj As Object
Dim PythonExe As String
Dim Script As String

Set obj = VBA.CreateObject("Wscript.Shell")

PythonExe = """C:\Program Files (x86)"""

Script = "C:\Users\User\Documents\testesbulkpdf\firsttry.py"

obj.Run "cmd /k cd /d" & PythonExe & "&& " & "python" & " " & Script

PYTHON КОД

# pip instal PyPDF2

import os

from PyPDF2 import PdfFileMerger


source_dir = os.getcwd()

merger = PdfFileMerger()

for item in os.listdir(source_dir):
    if item.startswith('Doc.'):
        merger.merge(position=0, fileobj=item, bookmark=None, pages=None)
           
    if item.endswith('pdf'):
        merger.append(item)
    
merger.write('try.pdf')
merger.close()



Erro - изображение и текст (https://imgur.com/a/JmZdJeK)

Traceback (most recent call last):
  File "C:\Users\User\Documents\testesbulkpdf\firsttry.py", line 19, in <module>
    merger.write('try.pdf')
  File "C:\Users\User\AppData\Roaming\Python\Python38\site-packages\PyPDF2\merger.py", line 214, in write
    fileobj = file(fileobj, 'wb')
PermissionError: [Errno 13] Permission denied: 'try.pdf'
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...