只能给你个几个参考，当然还有其他方法，希望能够帮到你 望采纳 getobject函数 本质是打开的，只是看不到窗口 Dim wb as workbook set wb = getobject(具体路径+文件) with wb .............(operation on wb) end with wb.close false set wb=nothing
