以文本方式查看主题 - 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=44697) |
||||
-- 作者:heying325 -- 发布时间:2014/1/7 10:08:00 -- excel合并问题 版主你好,我是刚刚的那位合并问题的求助者,你建议我用另一种方法合并,我写了代码,可是死活跳出错误,请帮我再看看,麻烦您了!!谢谢!!
|
||||
-- 作者:heying325 -- 发布时间:2014/1/7 10:12:00 -- 为什么会出现序号呢?? |
||||
-- 作者:heying325 -- 发布时间:2014/1/7 10:30:00 -- |
||||
-- 作者:Bin -- 发布时间:2014/1/7 10:42:00 -- Dim Book As New XLS.Book(dlg.FileName) Dim Sheet As XLS.Sheet For i As Integer = 0 To Book.Sheets.count-1 Sheet = Book.Sheets(2) messagebox.show(sheet.Name) Next 你换一个表看看吧
|
||||
-- 作者:heying325 -- 发布时间:2014/1/7 11:18:00 -- 谢谢版主!的确是表格的问题。但现在有一个新的问题,那就是foxtable表中有一个逻辑列,合并跳出这样的错误: String was not recognized as a valid boolean.Couldn\'t store <> in 该列 Column. Expected type is Boolean. 我将excel中的这列内容该为1、0 不行,该成TRUE、False也不行!!空的还不行!!该怎么合并逻辑列呢?
|
||||
-- 作者:Bin -- 发布时间:2014/1/7 11:24:00 -- 加一个判断, 如果循环到这一列了.判断一下内容然后再赋值 例如 if i=18 then \'假如18列是逻辑列 dr(XX)=IIF(sheet(N,M).value=0,false,true) end if
|
||||
-- 作者:heying325 -- 发布时间:2014/1/7 11:34:00 -- 额,谢谢!! |