- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- excel报表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=194187)
-- 发布时间：2024/11/16 15:30:00
-- excel报表
请教老师：单元格表达式<IIF([规格_宽mm] = "",[规格_公称mm]&"，L="&[规格_长mm],[规格_公称mm]&"，"&[规格_宽mm]&"×"&[规格_长mm])>
生成表格后，下面的空白行不要显示“,L=”,就是空白，要如何改表达式？
-- 发布时间：2024/11/16 16:12:00
--
<IIF([规格_宽mm] = "",[规格_公称mm] & IIF([规格_长mm] is null or [规格_长mm]="","","，L=") & [规格_长mm],"", [规格_公称mm] & "，" & [规格_宽mm] & "×" & [规格_长mm])>
-- 发布时间：2024/11/16 16:27:00
--
有没有可能在空白行的第一行显示“以下空白”
[此贴子已经被作者于2024/11/16 16:28:19编辑过]
-- 发布时间：2024/11/16 16:56:00
--
生成报表后，另使用代码打开文件，倒序遍历execl文件所有行，如果是第一个空行就填入“以下空白”：http://www.foxtable.com/webhelp/topics/1144.htm
Dim Book As New XLS.Book(ProjectPath & "Attachments\\出库单.xls")
Dim fl As String = ProjectPath & "Reports\\出库单.xls"
Book.Build() \'生成细节区
Dim fl As String = ProjectPath & "Reports\\出库单.xls"
Book.Build() \'生成细节区
For n As Integer = Sheet.Rows.Count -1 to 1 step -1
if Sheet(n,名称列的索引).Value > "" then
Sheet(n+1,名称列的索引).Value = "以下空白"
exit for
end if
next
Book.Save(fl) \'保存工作簿
-- 发布时间：2024/11/19 13:15:00
--
单元格表达式改后，生成Excel表，规格列没有显示<IIF([规格_宽mm] = "",[规格_公称mm] & IIF([规格_长mm] is null or [规格_长mm]="","","，L=") & [规格_长mm],"", [规格_公称mm] & "，" & [规格_宽mm] & "×" & [规格_长mm])>
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:qr74-006-01原材料采购预算（单页）.xls |
[此贴子已经被作者于2024/11/19 13:16:31编辑过]
-- 发布时间：2024/11/19 13:33:00
--
<IIF([规格_宽mm] = "",[规格_公称mm] & IIF([规格_长mm] is null or [规格_长mm]="","",",L=") & [规格_长mm],[规格_公称mm] & "," & [规格_宽mm] & "×" & [规格_长mm])>