乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
楼主: shers

将Excel工作表读取到DataTable

[复制链接]

3

主题

28

帖子

1

银币

初来乍到

Rank: 1

铜币
40
发表于 2015-10-1 16:40:33 | 显示全部楼层
我提倡后期绑定互操作(COM),它避免了版本依赖关系。无论如何,我都需要安装Excel,因为它是我在将部分工作表内容写回相应的Autodesk产品之前选择的编辑器。实际上,在回答手头的问题时,这就是从 Excel Range 对象的 Value2 属性返回的对象创建 DataTable 的方法。无错误处理,假定存在命名列标题。module DataTable =。
let ofArray2D o =。
let dt = new System.Data.DataTable()。
将 o 与 匹配。
| 空 -> ()。
| o ->。
设 a =。
匹配框 o 与。
| :?(obj[,]) 作为 ->。
| o -> Array2D.create 1 1 o。
let jbase = a.GetLowerBound 0。
let jrange = {jbase + 1 .. a.GetUpperBound 0}。
let ibase = a.GetLowerBound 1。
let irange = {ibase .. a.GetUpperBound 1}。
for i in irange do。
dt.Columns.Add(。
字符串 a.[jbase, i], 。
类型)。
|> 忽略。
for j in jrange do。
让 row = dt,新行()。
for i in irange do 。
排,[i - ibase]。
dt.行,添加行 。
断续器。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-2-4 23:58 , Processed in 0.135757 second(s), 52 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表