Foxtable(狐表)用户栏目专家坐堂 → EXCEL 引用窗口textbox的请教


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

主题:EXCEL 引用窗口textbox的请教

帅哥哟,离线,有人找我吗?
海峰
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:17 积分:176 威望:0 精华:0 注册:2021/12/22 13:21:00
EXCEL 引用窗口textbox的请教  发帖心情 Post By:2021/12/29 10:37:00 [只看该作者]

请教老师:
EXCEL表里用标记法输入窗口中的TextBox,总是不对,请帮看看

BeforeBuild:

Select Case e.Book.TempLate
    Case "模板名称"
        e.Book.Marks.Add("流量",0)
        e.Book.Marks.Add("全压",0)
        e.Book.Marks.Add("静压",0)
        e.Book.Marks.Add("功率",0)
End Select

BuildDetail:

If Forms("筛选窗口").Opened

Select Case e.Book.TempLate

    Case "模板名称"

        e.Book.Marks("流量") = Form(筛选窗口).Controls("TextBox5").Value

        e.Book.Marks("全压") = Form(筛选窗口).Controls("TextBox6").Value

        e.Book.Marks("静压") = Form(筛选窗口).Controls("TextBox7").Value

        e.Book.Marks("功率") = Form(筛选窗口).Controls("TextBox9").Value

End Select

 

 


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


加好友 发短信
等级:超级版主 帖子:106112 积分:539671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/29 10:51:00 [只看该作者]

e.Book.Marks("流量") = Form("筛选窗口").Controls("TextBox5").Value

 回到顶部
帅哥哟,离线,有人找我吗?
海峰
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:17 积分:176 威望:0 精华:0 注册:2021/12/22 13:21:00
  发帖心情 Post By:2021/12/29 10:54:00 [只看该作者]

不好意思,没明白,麻烦老师给讲讲

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


加好友 发短信
等级:超级版主 帖子:106112 积分:539671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/29 10:58:00 [只看该作者]

少双引号

 回到顶部
帅哥哟,离线,有人找我吗?
海峰
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:17 积分:176 威望:0 精华:0 注册:2021/12/22 13:21:00
  发帖心情 Post By:2021/12/29 11:08:00 [只看该作者]

捣鼓了好多次,不好意思,我往这发时把双引号漏了,把s也漏了
没有错误显示了,打印结果textbox不显示




[此贴子已经被作者于2021/12/29 11:13:34编辑过]

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


加好友 发短信
等级:超级版主 帖子:106112 积分:539671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/29 11:20:00 [只看该作者]

窗口控件有值吗?
试试:e.Book.Marks("流量") = Form("筛选窗口").Controls("TextBox5").text

 回到顶部
帅哥哟,离线,有人找我吗?
海峰
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:17 积分:176 威望:0 精华:0 注册:2021/12/22 13:21:00
  发帖心情 Post By:2021/12/29 11:59:00 [只看该作者]


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:excel打印.table


附件里是Attachments里的表格,在BeforeBuild和BuildDetail都进行了设置,就是打印不出来,麻烦老师帮看一下

e.Book.Marks("流量") = Form("筛选窗口").Controls("TextBox5").text 提示未声明
[此贴子已经被作者于2021/12/29 13:20:15编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
海峰
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:17 积分:176 威望:0 精华:0 注册:2021/12/22 13:21:00
  发帖心情 Post By:2021/12/29 12:03:00 [只看该作者]

表格附件不知道为什么上传不了,就这样设计的EXCEL表格

图片点击可在新窗口打开查看

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


加好友 发短信
等级:超级版主 帖子:106112 积分:539671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/29 13:58:00 [只看该作者]

execl文件的名称是“模板名称”吗?

 回到顶部
帅哥哟,离线,有人找我吗?
海峰
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:17 积分:176 威望:0 精华:0 注册:2021/12/22 13:21:00
  发帖心情 Post By:2021/12/29 15:09:00 [只看该作者]

奥,捣鼓了半天原来是这里的原因,不好意思,谢谢了

 回到顶部