%% 打开工作表
try%判断是否打开了Excel服务器
Excel = actxGetRunningServer('Excel.Application');
catch
Excel= actxserver('Excel.Application');
end
% Excel.Visible = 1;
WorkBook = Excel.Workbook.Open(strcat(Data.DataPath,Data.FileName));%读取指定文件的句柄
Match = figure('Units','Centimeter','Position',[0.5,1,8,8]);
hgexport(Match,'-clipboard');%将图片复制到
剪贴板Excel = actxGetRunningServer('Excel.Application');
sheet = Excel.ActiveWorkbook.ActiveSheet;%获取当前工作表的句柄
sheet.Range(Data.Location{3}{1}).Select;%选取插入点位置
sheet.Paste;%粘贴剪贴板内容
close(gcf);
WorkBook.Save;
Excel.WorkBook.Close;
绝对正解,加分呦
本回答被提问者和网友采纳