| 查看: 3869 | 回复: 12 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
wind5fsa金虫 (小有名气)
|
[求助]
matlab读取excel多个sheet数据，处理并重新保存，高价求教高人 已有6人参与
|
|
原excel文档中有数百个sheet, 现在想要matlab读入该文档所有sheet的信息,获取每个sheet的B3和B4位置的数据,再把每个sheet名和对应的B3和B4位置的数据写到一个新的excel里面(保存在一个sheet). 格式是:新excel表格的D6位置对应源文件的第一个sheet名字,E6和F6分别是对应的sheet里面B3和B4位置的数据, 然后D7是下一个sheet名,E7和F7是源文件对应sheet里面B3和B4位置的数据,依次类推。原excel和新文件示意图分别如下图1图2。多谢！ 1.jpg  2.jpg |
回复此楼» 猜你喜欢
欢迎发来filecode的Mz6后的代码验证其规律
已经有74人回复
-
岩土工程学报什么时候才能终审完呐
已经有4人回复
-
时间戳又变了8-15
已经有25人回复
-
2027广东省杰青
已经有6人回复
-
快农历七夕节了，轻松一下，男人悄悄话，女施主请不要进来。
已经有3人回复
-
哪位老哥知道今年的国自然具体哪一天放榜？
已经有9人回复
-
咱们一起用铁证分析2026国家社科基金中标与否
已经有26人回复
-
我的国基提前知道中了，可是同事的操作让我实在接受不了，怎么会有这样的人
已经有16人回复
-
有时候，自然基金真的不能太认真 （我的申报经验）
已经有12人回复
-
招聘 金属平磨液，抛光液研发工程师
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- Matlab批量处理EXCEL数据并画图
已经有9人回复
- matlab循环语句怎么读取excel第二列并存入新excel
已经有6人回复
- 怎么在excel上筛选出两个sheet中相同的记录，并一一匹配
已经有4人回复
- 求助Matlab批处理for语句循环
已经有5人回复
- 如何把excel中两个子表连接起来
已经有6人回复
- Matlab数据如何连续写入Excel？
已经有5人回复
- [转载]MATLAB操作EXCEL文件，感觉不错，转载下方便下次使用！
已经有8人回复
- 关于matlab中循环读取多个excel文件的问题？
已经有3人回复
- 怎么样设置matlab在excel中的输出位置
已经有10人回复
- 【求助】matlab保存的数据mat，打开的时候怎么用excel打开？
已经有4人回复
- 【求助】VC++.NET/VC++ 调用EXCEL文件显示数据再控件上【已解决】
已经有13人回复
10楼2014-03-26 00:48:47
asmeng
金虫 (正式写手)
- 应助: 48 (小学生)
- 金币: 3910.5
- 红花: 5
- 帖子: 980
- 在线: 251.7小时
- 虫号: 2341507
- 注册: 2013-03-12
- 性别: GG
- 专业: 应用数学方法
wind5fsa2楼2014-03-21 20:07:27
wind5fsa
金虫 (小有名气)
- 应助: 1 (幼儿园)
- 金币: 30.5
- 散金: 75
- 帖子: 83
- 在线: 101.8小时
- 虫号: 1380271
- 注册: 2011-08-26
- 性别: GG
- 专业: 化学反应工程
3楼2014-03-21 20:13:53
【答案】应助回帖
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ...
感谢参与，应助指数 +1
wind5fsa: 金币+100, ★★★很有帮助, 谢谢！ 2014-03-24 23:07:28
感谢参与，应助指数 +1
wind5fsa: 金币+100, ★★★很有帮助, 谢谢！ 2014-03-24 23:07:28
|
通过VBA解决，下面是实例代码。假设你有100个工作表，现在把第k个工作表名称取出来放在第101个表的第k行第1列， 把第k个工作表的b3的值放在第k行第2列，把第k个工作表的b4的值放在第k行第3列。 Sub main()到底 Dim i As Integer For i = 1 To 100 Worksheets(101).Cells(i, 1).Names = Worksheets(i).Name '跨工作表引用 Worksheets(101).Cells(i, 2) = Worksheets(i).Cells(3, 2) '跨工作表引用 Worksheets(101).Cells(i, 3) = Worksheets(i).Cells(4, 2) '跨工作表引用 Next i End Sub |
5楼2014-03-24 13:29:24
25