So, i'm trying to run a Python code using VBA. Read a lot of similar topics here, but could not found an answer.
Every time i use the code below, CMD inform a Permission Error - image below.
The Python script run perfectly on manual click.
Any ideas on the matter?
VBA CODE
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 CODE
# 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 - image and text (https://i.stack.imgur.com/z37a2.jpg)
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'