[VBA]VBA调用Python

import xlwings as xw



def DailyAward():

    # 配置表读取

    app = xw.App(visible=False, add_book=False)

    app.display_alerts=False

    app.screen_updating=False

    wb = app.books.open(r'C:\Users\Administrator\Desktop\数值模板相关\配置表\Mod_Level.csv')

    wb2 = app.books.open(r"C:\Users\Administrator\Desktop\数值模板相关\myproject\myproject.xlsm")
     
    # 配置表写入
    wb3 = xw.Book.caller()
    wb3.sheets[3].range("B6").options(transpose=True).value = outPut_ticket;
    wb3.sheets[3].range("B7").options(transpose=True).value = input_BaseLevel;

    

Private Sub CommandButton1_Click()
    RunPython "from myproject import DailyAward; DailyAward()"
End Sub

​​​​​​​