以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [讨论]读取EXCEL的一个问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=41960)
--  作者：hiliuyong
--  发布时间：2013/10/31 11:34:00
--  [讨论]读取EXCEL的一个问题

Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog
dlg.Filter= "Excel文件|*.xls" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    Dim Book As New XLS.Book(dlg.FileName)
    Dim Sheet As XLS.Sheet = Book.Sheets(0)
    Dim Cell As XLS.CEll = Sheet(3,2)   
    msgbox(cell.value)

End If

 

以上语句可以通过，但是现在我把Sheet(3,2)命名为“客户”

实现类似的语句

Dim Cell As XLS.CEll = Sheet(“客户”) 

但是这句行不通，求教大家该如何写？

 
--  作者：Bin
--  发布时间：2013/10/31 11:38:00
--  
呵呵,这个是根据指定坐标获取单元格, 是不可以根据单元格的值来获取的哦.
--  作者：hiliuyong
--  发布时间：2013/10/31 11:41:00
--  
BIN，不是值，是命名
--  作者：hiliuyong
--  发布时间：2013/10/31 11:44:00
--  

比如VBA中可以把CELL(1,1)命名为“客户”，调用的时候可以读取CELL(1,1)的值，也可以读取RANGE("客户")的值，

继续顶帖，求高人赐教！
--  作者：Bin
--  发布时间：2013/10/31 11:45:00
--  
目前 只能根据坐标获取吧.
--  作者：hiliuyong
--  发布时间：2013/10/31 11:48:00
--  
继续顶，应该是可以通过命名读取的，只是我不知道方法是什么？
--  作者：狐狸爸爸
--  发布时间：2013/10/31 11:49:00
--  

不可以的，要不你改用vba处理吧：

http://www.foxtable.com/help/topics/2121.htm