我有excel作業簿和范圍（“A1”）的作業表，假設我有這條線進入單元格
print('Hello World')
有沒有辦法從 VBA 本身的單元中運行這個 python 腳本？
非常感謝@Anu
Sub Test()
Dim PID
PID = Shell("python -c '" & Range("A1").Value & "'", vbNormalNoFocus)
End Sub
如何將輸出列印到 VBE 中的即時視窗？
我試圖將一個 python 腳本放在一個單元格中，但這并沒有給我正確的輸出（沒有出現錯誤，但影像沒有轉換為照片/新檔案夾
import os
from PIL import Image
dirname_read = r"C:/Users/Future/Desktop/Photos/Demo/"
dirname_write = r"C:/Users/Future/Desktop/Photos/New/"
names = os.listdir(dirname_read)
count = 0
for name in names:
img=Image.open(dirname_read name)
name=name.split(".")
if name[-1] == "png" or name[-1] == "jpeg" or name[-1] == "PNG":
name[-1] = "jpg"
name = str.join(".", name)
to_save_path = dirname_write name
img = img.convert('RGB')
img.save(to_save_path)
count =1
else:
name = str.join(".", name)
to_save_path = dirname_write name
img.save(to_save_path)
images = [file for file in os.listdir(dirname_write) if file.endswith(('jpeg', 'png', 'jpg', 'PNG'))]
for image in images:
img = Image.open(dirname_write image)
img = img.resize((360, 540), Image.ANTIALIAS)
rgb_img = img.convert('RGB')
rgb_img.save(dirname_write image)
print("Total Converted Count: ", count)
uj5u.com熱心網友回復：
使用 VBA，您應該能夠運行 python shell。這樣你就可以將代碼傳遞給它。python -c 'print(f"test")'該-c標志允許將代碼作為字串傳遞。
編輯：VBA 代碼看起來很像這樣PID = Shell("python -c 'Range("A1").Value'", vbNormalNoFocus)（因為 VBA 不是我的主要語言，所以我將這部分放在一邊）
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/401392.html
下一篇：同列前一行的參考值