Foxtable(狐表)用户栏目专家坐堂 → [求助]Excel报表的页眉中能插入图片吗?


  共有4533人关注过本帖树形打印复制链接

主题:[求助]Excel报表的页眉中能插入图片吗?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106636 积分:542357 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 9:04:00 [显示全部帖子]

应该和图片没有关系,是 Book1.Save(fl)之后Excel进程还没有退出,再程序打开就出错了,保存后kill掉Excel的进程试试

Book1.Save(fl) '保存工作簿
kill的代码
Dim App As New MSExcel.Application

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106636 积分:542357 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 10:39:00 [显示全部帖子]

Excel生成的临时文件你动他干啥,要操作的是正式的文件。删除进程参考:

……
Book1.Save(fl) '保存工作簿

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("excel")
For Each p As System.Diagnostics.Process In ps

    msgbox(p.MainWindowTitle)
    If p.MainWindowTitle = Nothing Then  p.kill
Next

Dim App As New MSExcel.Application

……


 回到顶部