Foxtable(狐表)用户栏目专家坐堂 → [求助] 关于使用VBA操作EXCEL的问题,球大神解决!


  共有3146人关注过本帖树形打印复制链接

主题:[求助] 关于使用VBA操作EXCEL的问题,球大神解决!

帅哥哟,离线,有人找我吗?
菲舍尔
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:509 积分:3547 威望:0 精华:3 注册:2012/11/13 15:49:00
  发帖心情 Post By:2014/10/14 1:47:00 [显示全部帖子]

如果你的excel表已经是如此规范,直接引用就好了

 

 

dim dt as datatable = datatables(“表名”)

dim book as xls.book("文件名")

dim sheet as xls.sheet = book.sheet(0)

 

‘你已知(1,2)是列名,直接从(2,2)开始引用就好了

for i as integer = 2 to 100 ’结尾自己改

     if sheet(i,2)value <> "" then

        dim dr as datarow = dt.addnew

        dr("姓名") = sheet(i,2).value

        dr("列名") = sheet(i,?).value ‘要引用其他列的值

。。。。。

    endif

next

dt.save


 回到顶部