以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  XLS.BOOK如何判断EXCEL隐藏列？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85332)
--  作者：南望
--  发布时间：2016/5/23 14:32:00
--  XLS.BOOK如何判断EXCEL隐藏列？
各位老师请教个问题：

用XLS.BOOK或MSEXCELE，哪个可以判断EXCEL隐藏列？如何判断
--  作者：大红袍
--  发布时间：2016/5/23 14:58:00
--  

两个都可以判断，判断隐藏列，就是判断列的宽度即可。
--  作者：南望
--  发布时间：2016/5/23 15:13:00
--  
明白了，判断列宽度=0就行是吧？
--  作者：大红袍
--  发布时间：2016/5/23 15:24:00
--  

你要用vba才能准确判断

 


Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\\test.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
msgbox(ws.Columns(3).width)
App.Quit
--  作者：南望
--  发布时间：2016/8/23 16:44:00
--  
追问：
用XLS.BOOK来写行的高度和列的宽度不等于0应该如何写，感觉用下面的写法程序不认呢？
If sheet.Cols(2).width <> 0 and sheet.rows(2).height <> 0 Then
end if
--  作者：南望
--  发布时间：2016/8/23 16:49:00
--  
另外您说的要用VBA才能准确判断，是不是XLS.BOOK判断隐藏行和列就不准确了？为什么？
--  作者：大红袍
--  发布时间：2016/8/23 16:57:00
--  

你msgbox看看

 

msgbox(sheet.Cols(2).width)

msgbox(sheet.rows(2).height)
--  作者：南望
--  发布时间：2016/8/23 16:57:00
--  
TO大红袍老师帮忙看看
--  作者：南望
--  发布时间：2016/8/23 17:04:00
--  
都是0，而实际上有列宽行宽的