Foxtable(狐表)用户栏目专家坐堂 → 生成带图片的报表


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

主题:生成带图片的报表

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


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/4 9:01:00 [显示全部帖子]

1、提示什么错误?建议先直接在模板里设计好,测试没有问题后,再改为使用代码动态设置

2、如果要在模板里引用图片列,应该这样用:http://www.foxtable.com/webhelp/topics/1387.htm

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


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/5 22:47:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/6 15:13:00 [显示全部帖子]

保护工作表,写了什么代码?

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


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/6 16:24:00 [显示全部帖子]

……
Dim fl As String = ProjectPath & "导出表\" & Vars("年度") & Vars("学期") & Vars("县市") & Vars("单位名称") & "学生胸卡.xls"
Book.Save(fl) '保存工作簿
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets("打校园卡")
Ws.Protect(Password:="hhh")  '以密码保护
Wb.Save
App.Visible = True


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


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/6 21:49:00 [显示全部帖子]

电脑系统安装的office有问题。卸载所有office,然后重新安装完整版的office。如果有安装wps,也卸载掉

 回到顶部