以文本方式查看主题

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

--  作者:baoxyang
--  发布时间:2009/12/16 8:49:00
--  请教下,有关Excel中的行数及列数问题?
Dim dlg As New OpenFileDialog
dim f1,c1,r1 as string
   dlg.Filter= "Excel文件|*.xls"   
If dlg.ShowDialog = DialogResult.Ok Then 
   f1 = dlg.FileName
   If f1<> " " then
      Dim Book As New XLS.Book(f1)
      Dim Sheet As XLS.Sheet = Book.Sheets(0)
      r1 = Sheet.Rows.Count
      c1 = Sheet.Cols.Count
      messagebox.show(r1)
      messagebox.show(c1)
   end if
end if

得到的r1与实际行数(47行)不相符,显示为6万多行,列数还是不和实际相符,请指教,如何获得实际行数及列数?

--  作者:狐狸爸爸
--  发布时间:2009/12/16 9:48:00
--  

我也不知道


--  作者:yangming
--  发布时间:2009/12/16 10:37:00
--  
估计是你的EXCEL表中的格式问题,比如,你的表中的单元格的格式中的列的格式是所有列,或是大于实际列,那当然与实际列数不同了。我想你可能是点了全选的按钮进行格式操作的,不然怎么会有六万多行呢
要不,就上传你的EXCEL文件看看?
[此贴子已经被作者于2009-12-16 10:38:00编辑过]

--  作者:baoxyang
--  发布时间:2009/12/17 8:38:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:book1.rar


--  作者:baoxyang
--  发布时间:2009/12/17 8:45:00
--  

行数及列数应跟格式是无关的,只是包含内容的行与列才对


--  作者:易狐
--  发布时间:2009/12/17 9:16:00
--  
除非贺老师增加结束行、结束列标记的方法!
--  作者:reachtone
--  发布时间:2009/12/17 9:32:00
--  
这个问题一直存在,估计暂时无法找出很好的解决办法。
--  作者:yangming
--  发布时间:2009/12/17 10:59:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:book1.rar

试试这个

--  作者:baoxyang
--  发布时间:2009/12/17 15:51:00
--  

这个是可以的,不知何原因?有的可以有的不可以。谢杨版


--  作者:yangming
--  发布时间:2009/12/17 16:12:00
--  
以下是引用baoxyang在2009-12-17 15:51:00的发言:

这个是可以的,不知何原因?有的可以有的不可以。谢杨版

还是格式的问题,你原来的文件的第一列做过列宽的设置,是选择全列的,所以表的第一列的所有行的格式都变了,我改了列宽后,就没问题了