| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]告诉导入为什么不能导入时间跟小数？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=135742) |
| -- 作者：zto001 -- 发布时间：2019/6/2 18:02:00 -- [求助]告诉导入为什么不能导入时间跟小数？ [求助]告诉导入为什么不能导入时间跟小数？ |
| -- 作者：有点甜 -- 发布时间：2019/6/3 8:57:00 -- 1、合并 http://www.foxtable.com/webhelp/scr/2334.htm
2、你要把日期列改成长日期格式
3、上传具体实例说明你的问题
|
| -- 作者：zto001 -- 发布时间：2019/6/5 9:04:00 -- 1、合并 http://www.foxtable.com/webhelp/scr/2334.htm 这个如果我要按照标题相对应合并，顺序是乱的，如何写？ |
| -- 作者：有点蓝 -- 发布时间：2019/6/5 10:34:00 -- 比如： Dim s1 As new List(of String) For Each r As Col In Tables("SubjectList").Cols s1.Add(r.Name) Next Dim Book As New XLS.Book("c:\\test\\订单.xls") Dim Sheet As XLS.Sheet = Book.Sheets(0) Dim dict As new Dictionary(of String,Integer) Tables("订单").StopRedraw() For m As Integer = 0 To Sheet.Cols.Count - 1 If s1.Contains(Sheet(0,m)) Then dict.add(Sheet(0,m),m) End If Next \'注意下面的循环变量从1开始,而不是从0开始,因为Excel表的第一行是标题 For n As Integer = 1 To Sheet.Rows.Count -1 Dim r As Row = Tables("订单").AddNew() For Each key As String In dict.Keys r(key) = Sheet(n,dict(m1)).Value Next Next Tables("订单").ResumeRedraw() |
| -- 作者：zto001 -- 发布时间：2019/6/9 9:15:00 -- XLS.cell 无法转换为 String。这是为什么？
|
| -- 作者：有点甜 -- 发布时间：2019/6/9 10:13:00 -- Dim s1 As new List(of String)
或者看看 http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=101056&skin=0
|
| -- 作者：zto001 -- 发布时间：2019/6/10 16:04:00 -- http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=101056&skin=0 这个链接上的我知道但是他只能按照Excel表的顺序导，如果Excel表的顺序不是foxtable的顺序，就会出错 你写的代码实在不会，老出错 |
| -- 作者：有点甜 -- 发布时间：2019/6/10 16:07:00 --
上传具体实例说明你的问题
|