以文本方式查看主题

-  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=40765)

--  作者:zpx_2012
--  发布时间:2013/9/28 19:55:00
--  导入excel表中有逻辑值时出错
将现有表中的数据导出到excel后 逻辑列显示为false或true,再想导入到表中时提示出错,请教这种情况要怎么处理?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:excel数据导入.rar


谢谢!


--  作者:有点甜
--  发布时间:2013/9/28 20:20:00
--  
 测试了一下,没办法,只能去判断处理了。同时,注意你的第三列的别名不匹配。

If t1.Cols(str.split(",")(j)).IsBoolean Then
    If "False|0|FALSE".Contains(sheet(i, j).Value) Then
        r(str.split(",")(j)) = False
    Else
        r(str.split(",")(j)) = True
    End If
Else
    r(str.split(",")(j)) = sheet(i, j).Value
End If

--  作者:zpx_2012
--  发布时间:2013/9/28 20:52:00
--  
谢谢!我再看看。