应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

Znn3bq.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » MATLAB/Mathematica » matlab读取excel多个sheet数据，处理并重新保存，高价求教高人
131/2返回列表12下一页
查看: 3547  |  回复: 12
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

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。多谢！

matlab读取excel多个sheet数据，处理并重新保存，高价求教高人
1.jpg


matlab读取excel多个sheet数据，处理并重新保存，高价求教高人-1
2.jpg
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
祝福
1楼 2014-03-21 16:00:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

isityou

金虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ...
感谢参与，应助指数 +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
赞一下(2人) 回复此楼
5楼2014-03-24 13:29:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

asmeng

金虫 (正式写手)

【答案】应助回帖

感谢参与，应助指数 +1
用excel宏就可以了，如果你不知道怎样写宏语言，可以录制宏，看它生成的语句来写。
赞一下(1人) 回复此楼

» 本帖已获得的红花（最新10朵）

wind5fsa
2楼2014-03-21 20:07:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

wind5fsa

金虫 (小有名气)
送红花一朵
引用回帖:
2楼: Originally posted by asmeng at 2014-03-21 20:07:27
用excel宏就可以了，如果你不知道怎样写宏语言，可以录制宏，看它生成的语句来写。

谢谢！我试了试，没整出来，感觉还是编个matlab程序一直放那比较方便
赞一下 回复此楼
祝福
3楼2014-03-21 20:13:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

morphine

金虫 (初入文坛)

【答案】应助回帖

感谢参与，应助指数 +1
内容已删除
赞一下 回复此楼
4楼2014-03-22 10:01:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

isityou

金虫 (小有名气)

【答案】应助回帖

引用回帖:
5楼: Originally posted by isityou at 2014-03-24 13:29:24
通过VBA解决，下面是实例代码。假设你有100个工作表，现在把第k个工作表名称取出来放在第101个表的第k行第1列，
把第k个工作表的b3的值放在第k行第2列，把第k个工作表的b4的值放在第k行第3列。
Sub main()到底
D ...

抱歉，修改一句，
Worksheets(101).Cells(i, 1).Names = Worksheets(i).Name
改为
Worksheets(101).Cells(i, 1) = Worksheets(i).Name
赞一下 回复此楼
6楼2014-03-24 13:42:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lixinwen000

木虫 (正式写手)
引用回帖:
5楼: Originally posted by isityou at 2014-03-24 13:29:24
通过VBA解决，下面是实例代码。假设你有100个工作表，现在把第k个工作表名称取出来放在第101个表的第k行第1列，
把第k个工作表的b3的值放在第k行第2列，把第k个工作表的b4的值放在第k行第3列。
Sub main()到底
D ...

我有一个小疑问，如果这100个Worksheets分布在100个excel文件里面又该用什么语句？
另外我对编程语言很感兴趣，有一定的VB、C、Fortran基础，但对宏没有动手实践过，希望能够多多指教
赞一下 回复此楼
静水流深
7楼2014-03-24 17:44:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

isityou

金虫 (小有名气)
引用回帖:
7楼: Originally posted by lixinwen000 at 2014-03-24 17:44:45
我有一个小疑问，如果这100个Worksheets分布在100个excel文件里面又该用什么语句？
另外我对编程语言很感兴趣，有一定的VB、C、Fortran基础，但对宏没有动手实践过，希望能够多多指教...

百度不是最好的老师，但一定是最全的老师。
给个简单例子，通过索引。
Sub main()
For i = 1 To 100
Workbooks(101).Worksheets(1).Cells(i, 1) = Workbooks(i).Worksheets(1).Cells(1, 1)
Next i
End Sub

应该能看懂吧。
赞一下 回复此楼
8楼2014-03-24 22:56:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lixinwen000

木虫 (正式写手)
引用回帖:
8楼: Originally posted by isityou at 2014-03-24 22:56:59
百度不是最好的老师，但一定是最全的老师。
给个简单例子，通过索引。
Sub main()
For i = 1 To 100
Workbooks(101).Worksheets(1).Cells(i, 1) = Workbooks(i).Worksheets(1).Cells(1, 1)
Next i
End Sub
...

可以领会到语句的意思，VB的语法应该不成问题，我是想系统的学习宏里面用到的关键词，有没有什么比较好的教材或者学习资料可以推荐的？
赞一下 回复此楼
静水流深
9楼2014-03-25 00:15:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

isityou

金虫 (小有名气)

【答案】应助回帖

教才什么的好说，随便那本看懂了就行，只要有编程基础，查查VBA相关参考书就行。用到就查，没必要记住。

[ 发自手机版 http://muchong.com/3g ]
赞一下 回复此楼
10楼2014-03-26 00:48:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wind5fsa 的主题更新
131/2返回列表12下一页
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 0860004 求调剂 309分 +3 Yin DY 2026-04-08 3/150 2026-04-08 23:16 by 男人海洋—
[考研] 求调剂 +9 月@163.com 2026-04-07 11/550 2026-04-08 14:48 by qlm5820
[考研] 274求调剂 +4 山阿蔓 2026-04-07 4/200 2026-04-08 09:49 by eyeliyang
[考研] 336材料与化工085600求调剂 +19 水星记infp 2026-04-05 22/1100 2026-04-07 21:11 by yongzhesheng
[考研] 生物学363调剂求助 +7 fanzhang6666 2026-04-06 9/450 2026-04-07 17:37 by lijunpoly
[考研] 材料求调剂 +18 一样YWY 2026-04-05 18/900 2026-04-07 15:49 by dxlg
[考研] 求调剂 +11 xzghyuj 2026-04-04 11/550 2026-04-06 11:49 by lijunpoly
[考研] 一志愿青科085500，初试295分，公共课213分 +3 遇到的人愿望都� 2026-04-05 3/150 2026-04-05 18:45 by 蓝云思雨
[考研] 313求调剂 +5 海日海日 2026-04-04 7/350 2026-04-05 13:58 by imissbao
[考研] 材料化工306分找合适调剂 +14 沧海轻舟e 2026-04-04 14/700 2026-04-05 09:53 by 朱云虎202
[考研] 085400电子信息319求调剂（接受跨专业调剂） +5 星星不眨眼喽 2026-04-03 6/300 2026-04-04 21:50 by hemengdong
[考研] 333求调剂 +12 wfh030413@ 2026-04-03 13/650 2026-04-04 21:02 by jj987
[考研] 309求调剂 +6 刘刘刘1231 2026-04-02 7/350 2026-04-04 13:41 by liucky
[考研] 求调剂 +3 农业工程与信息� 2026-04-04 3/150 2026-04-04 12:19 by 舍而后得
[考研] 22408，264求调剂 +3 ywh729 2026-04-03 4/200 2026-04-04 11:04 by ywh729
[考研] 372分材料与化工（085600）一志愿湖南大学求调剂 +3 蓝笺片 2026-04-03 4/200 2026-04-03 17:58 by Jimmyandyou
[考研] 081200-11408-276学硕求调剂 +5 崔wj 2026-04-03 5/250 2026-04-03 15:06 by arrow8852
[考研] 专硕085601求调剂 +7 suyifei 2026-04-03 8/400 2026-04-03 14:00 by 欣喜777
[考研] 一志愿复旦材料，英一专硕，总分357调剂 +4 1050389037 2026-04-02 5/250 2026-04-02 21:40 by dongzh2009
[考研] 一志愿武汉理工0856，初试334 +3 26考研材料 2026-04-02 3/150 2026-04-02 21:22 by dongzh2009
信息提示
关闭
请填处理意见
关闭