- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]单元格内容格式需求 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=102826)
-- 发布时间：2017/6/26 15:47:00
-- [求助]单元格内容格式需求
此主题相关图片如下：a.png
表A中的第一列是表B中第一到第五列的内容，按上图方式显示，请问应该怎么写？表B相关内容更新后，表A的单元格内容也更新，另外，表A单元格的底色依据表B有一个状态的内容来设定，比如如果状态为Ok，那么上图单元格底色为绿色
-- 发布时间：2017/6/26 16:29:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:test2.table |
-- 发布时间：2017/6/26 16:38:00
--
谢谢色版，如果不能换行的，我会写，关键是一定要上图的格式来， 是不是需要绘图了？请指导下
-- 发布时间：2017/6/26 17:24:00
--
各个字符之间填充足够的空格，不就行了？
If e.DataCol.name = "第二列" Then
Dim fdr As DataRow = DataTables("表B").Find("第八列 = \'" & e.DataRow("第二列") & "\'")
If fdr Is Nothing Then
e.DataRow("第一列") = Nothing
e.DataRow("第三列") = Nothing
Else
e.DataRow("第一列") = fdr("第一列").padright(10) & " " & fdr("第二列").padright(10) & " " & fdr("第三列") & vbcrlf & fdr("第四列").padright(10) & " " & fdr("第五列")
e.DataRow("第三列") = fdr("状态")
End If
End If