按钮代码With Tables("单证在库_Table1")
.Select(0,0, .Rows.Count -1, .Cols.Count -1)
End With '全选表
Dim Book As New XLS.Book(ProjectPath & "Attachments\模板.xlsx")
Book.Build()
Book.Save("\\127.0.0.1\d\q\q.xlsx")
Dim Proc As New Process
Proc.File = ("\\127.0.0.1\d\q\q.xlsx")
Proc.Start()
模板文件
![dvubb 图片点击可在新窗口打开查看](skins/default/filetype/png.gif)
此主题相关图片如下:企业微信截图_16272813324716.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2021-7/20217261437778315.png)
出来的是空白文件,多了个安全提示,对应增加了空白行,但是里面的内容并没有写进去,
![dvubb 图片点击可在新窗口打开查看](skins/default/filetype/png.gif)
此主题相关图片如下:企业微信截图_16272811638073.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2021-7/202172614382496265.png)
不知道哪里出了问题,之前还是好好的
![dvubb 图片点击可在新窗口打开查看](images/emot/em06.gif)