以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  excel报表的打印范围问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=54342)

--  作者:northebaby
--  发布时间:2014/7/25 23:30:00
--  excel报表的打印范围问题
设计了一个报表模板,同时显示主表( 接收 文件表)和关联表 (指令性工作表) 数据,现在的问题是我想通报全局变量控制主表的打印范围,但是表达式总提示  语法错误:“*”运算符前缺少操作数。请各位前辈指点一下,是不是我表达式的位置不对还是语法错误
图片点击可在新窗口打开查看此主题相关图片如下:无标题.jpg
图片点击可在新窗口打开查看

--  作者:Bin
--  发布时间:2014/7/26 9:37:00
--  
动态条件恐怕不能这么做

请用这个方式


--  作者:northebaby
--  发布时间:2014/7/26 10:06:00
--  

谢谢,这个方法我也试过了,也不起作用,估计还是说我的表达式有问题,用全局变量的方法我认为是可行的,但是foxtable就是没有可参照的例子,狐狸爸爸不知道能不能解释,我怀疑是在细节区的这个设置方法不适合空值主表,只能控制关联表

[此贴子已经被作者于2014-7-26 10:13:41编辑过]

--  作者:Bin
--  发布时间:2014/7/26 10:08:00
--  
用2楼方法绝对可行  *号去掉. 搞不定上例子
--  作者:northebaby
--  发布时间:2014/7/26 10:14:00
--  
试试再看看
--  作者:northebaby
--  发布时间:2014/7/26 10:29:00
--  

Dim Book As New XLS.Book(ProjectPath & "Attachments\\指令.xls")
Dim fl As String = ProjectPath & "Reports\\指令落实情况表.xls"
Dim  Sheet As  XLS.Sheet =  Book.Sheets(0)
Sheet(3,7).Value = "< 文件编号 > \'" & [!startnum] & "\'> "  \'写入打印条件
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

 

写入打印条件这句怎么都通不过,bin大帮忙分析一下


--  作者:Bin
--  发布时间:2014/7/26 10:30:00
--  
你为何不按照帮助的来做呢,为什么非要弄个引用全局变量呢, 你直接设置全家变量的值不就完了图片点击可在新窗口打开查看


--  作者:Bin
--  发布时间:2014/7/26 10:32:00
--  

Dim Book As New XLS.Book(ProjectPath & "Attachments\\指令.xls")
Dim fl As String = ProjectPath & "Reports\\指令落实情况表.xls"
Dim  Sheet As  XLS.Sheet =  Book.Sheets(0)
Sheet(3,7).Value = "< 文件编号 > \'" & vars("tartnum") & "\'> "  \'写入打印条件  如果是数值列  
"< 文件编号 > " & vars("tartnum") & "> " 
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()


--  作者:northebaby
--  发布时间:2014/7/26 10:37:00
--  
因为我要用它来控制打印范围,打印范围是不断变化的,所以这样处理,还能有其他好的办法???
--  作者:Bin
--  发布时间:2014/7/26 10:40:00
--  
这样也是一直在变化的啊.