楼主: 化外人
2657 0

matlab csv批量转换为xls文件代码 [推广有奖]

  • 0关注
  • 0粉丝

小学生

57%

还不是VIP/贵宾

-

威望
0
论坛币
558 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
393 点
帖子
3
精华
0
在线时间
9 小时
注册时间
2014-12-25
最后登录
2020-4-4

楼主
化外人 发表于 2016-3-25 18:19:31 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
clc
clear;
path='F:\历史全息数据_样本(2013 2014年数据)\overview_all_data';%记得改成自己的路径
%把路径path中的xlsx文件批量转换为csv文件
%counts: 被处理的文件总数

%获取路径path中的所有xlsx文件信息

if path(end) ~= '\'
    path = [path, '\'];
end
dirs = dir([path, '*.csv']);
counts = length(dirs);

%打开Excel

he = actxserver('Excel.Application');
he.DefaultFilePath = path;
he.DisplayAlerts = 0;
las='F:\历史全息数据_样本(2013 2014年数据)\所有股票\';%记得改成自己的路径
%逐个处理xlsx文件
for i = 1:counts
    disp(['正在转换文件: ', dirs(i).name]);
    tic
    hw = he.WorkBooks.Open([path, dirs(i).name]);
    [pathname, basename, extname] = fileparts(dirs(i).name);
    filename = [las, basename, '.xls'];
    hw.SaveAs(filename);
    hw.Close;
    toc
end
he.Quit;
disp('转换完毕');


二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:MATLAB atlab matla Mat Lab matlab

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

本版微信群
扫码
拉您进交流群
GMT+8, 2026-1-23 15:40