以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- excle报表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120159) |
-- 作者:13775189031 -- 发布时间:2018/6/8 13:56:00 -- excle报表 Dim Book As New XLS.Book(ProjectPath & "Attachments\\QR755-002领料清单.xls") \'打开模板 Dim fl As String = ProjectPath & "Reports\\QR755-002领料清单.xls" Dim Sheet As XLS.Sheet = Book.Sheets(1) Sheet(6,11).Value = "<"统计日期 >= #" & dt1 & "# And 统计日期 <= #" & dt2 & "#">" \'写入打印条件 Book.Build() \'生成报表 Book.Save(fl) Dim Proc As New Process Proc.File = fl Proc.Start() 按“统计日期”打印当月领料清单,写入单元格后预览,显示 .NET Framework 版本:2.0.50727.8762 Foxtable 版本:2018.3.9.1 错误所在事件: 详细错误信息: 语法错误:“Book”运算符后缺少操作数。 不知道哪有问题!
|
-- 作者:有点甜 -- 发布时间:2018/6/8 14:17:00 -- 改成
Sheet(6,11).Value = "<统计日期 >= #" & dt1 & "# And 统计日期 <= #" & dt2 & "#>" \'写入打印条件 |
-- 作者:13775189031 -- 发布时间:2018/6/8 14:27:00 -- 如果在增加一个条件,例如打印 “统计日期”为本月的 “物资说明”=“紧固件”的列 该怎么改?
|
-- 作者:有点甜 -- 发布时间:2018/6/8 14:48:00 -- Sheet(6,11).Value = "<统计日期 >= #" & dt1 & "# And 统计日期 <= #" & dt2 & "# and 物资说明=\'紧固件\'>" \'写入打印条件 |
-- 作者:13775189031 -- 发布时间:2018/6/8 15:44:00 -- Dim y As Integer = Date.Today.Year Dim m As Integer = Date.Today.Month Dim dt1 As New Date(y, m, 1) Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) \'获取本月的最后一天 Dim Book As New XLS.Book(ProjectPath & "Attachments\\QR755-002领料清单.xls") \'打开模板 Dim fl As String = ProjectPath & "Reports\\QR755-002领料清单.xls" Dim Sheet As XLS.Sheet = Book.Sheets(1) Sheet(6,11).Value = "<统计日期 >= #" & dt1 & "# And 统计日期 <= #" & dt2 & "# and 物资说明=\'紧固件\'>" \'写入打印条件 Book.Build() \'生成报表 Book.Save(fl) Dim Proc As New Process Proc.File = fl Proc.Start() .NET Framework 版本:2.0.50727.8762 Foxtable 版本:2018.3.9.1 错误所在事件: 详细错误信息: 语法错误:“y”运算符后缺少操作数。 请教是什么问题? |
-- 作者:有点蓝 -- 发布时间:2018/6/8 17:07:00 -- 规则看看是哪句代码出错,调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm |