Код: Выделить всё
Private Sub CB1_Click()
Dim objShell As Object
Dim PythonExePath As String, PythonScriptPath As String
Set objShell = VBA.CreateObject("Wscript.Shell")
PythonExePath = """C:\\Users\\richh\\AppData\\Local\\Microsoft\\WindowsApps\\python.exe"""
PythonScriptPath = "C:\\Users\\richh\\Project4\\FromExcel.py"
objShell.Run PythonExePath & PythonScriptPath
End Sub
Код: Выделить всё
import pandas as pd
input("Enter name")
import matplotlib.pyplot as plt
import seaborn as sns
path = "C:\\\\Users\\\\richh\\\\Project4\\\\PythonExcel.xlsm"
data = pd.read_excel(path)
print(data)
data.price.hist()
plt.show()
Подробнее здесь: https://stackoverflow.com/questions/798 ... from-excel
Мобильная версия