VB代码：打开本地Excel文件并执行函数

Sub CommandButton3_Click() Dim wb As Workbook Set wb = Workbooks.Open('C:\Users\username\Documents\example.xlsx') '修改为实际文件路径

'在此编写需要执行的代码

wb.Close SaveChanges:=True '保存并关闭打开的Excel文件

End Sub