Microsoft 365 Exécuter un script python depuis vba

from datetime import datetime
import traceback

try:   
    now = datetime.now()

    year_second_digit = str(now.year)[-1] 
    month_second_digit = str(now.month)[-1] 

    ID = f"Z{year_second_digit}{month_second_digit}{now.strftime('%d%H%M%S')}{int(now.microsecond / 1000):03d}"
    DTE = now.strftime('%y%m%d')
    HRE = now.strftime('%H%M')

    with open('output.txt', 'w') as file:       
        file.write(f"{ID}\n")
        file.write(f"{DTE}\n")
        file.write(f"{HRE}\n")

except Exception as e:
    with open('error_log.txt', 'w') as error_file:
        error_file.write(str(e))
        error_file.write('\n')
        error_file.write(traceback.format_exc())

Sub RunPythonScript()
    Dim pythonExecutable As String
    Dim scriptPath As String
    Dim command As String    
    ' Spécifiez le chemin de l'exécutable Python
    pythonExecutable = "C:\Path\To\Python\python.exe"
    ' Spécifiez le chemin du script Python
    scriptPath = "C:\Path\To\Your\Script\script.py"
    ' Construire la commande
    command = pythonExecutable & " " & scriptPath
    ' Exécuter la commande
    Shell command, vbNormalFocus
End Sub