問題:如何將**自動匯入excel或word檔案中,換句話說,就是怎樣用matlab生成帶有**的excel和word文件,對此,我分別寫了下面兩個小程式,並在matlab2008a中經過了測試。
1. 用matlab生成帶有**的excel文件
function ceshi_excel
%設定測試excel檔名和路徑
filespec_user=[pwd '\測試.xls'];
%判斷excel是否已經開啟,若已開啟,就在開啟的excel中進行操作,
%否則就開啟excel
try excel=actxgetrunningserver('');
catch
excel = actxserver('');
end;
%設定excel屬性為可見
set(excel, 'visible', 1);
%返回excel工作簿控制代碼
workbooks =
%若測試檔案存在,開啟該測試檔案,否則,新建乙個工作簿,並儲存,檔名為測試.excel
if exist(filespec_user,'file');
workbook = invoke(workbooks,'open',filespec_user);
else
workbook = invoke(workbooks, 'add');
end%返回工作表控制代碼
sheets =
%返回第乙個**控制代碼
sheet1 = get(sheets, 'item', 1);
%啟用第乙個**
invoke(sheet1, 'activate');
%如果當前工作表中有圖形存在,通過迴圈將圖形全部刪除
shapes=
if for i=
end;
end;
%隨機產生標準正態分佈隨機數,畫直方圖,並設定圖形屬性
zft=figure('units','normalized','position',...
[0.280469 0.553385 0.428906 0.251302],'visible','off');
set(gca,'position',[0.1 0.2 0.85 0.75]);
data=normrnd(0,1,1000,1);
hist(data);
grid on;
xlabel('考試成績');
ylabel('人數');
%將圖形複製到貼上板
hgexport(zft, '-clipboard');
%將圖形貼上到當前**的a5:b5欄裡
'a5:b5').select
%刪除圖形控制代碼
delete(zft);
2. 用matlab生成帶有**的word文件
function ceshi_word
%設定測試word檔名和路徑
filespec_user=[pwd '\測試.doc'];
%判斷word是否已經開啟,若已開啟,就在開啟的word中進行操作,
%否則就開啟word
try word = actxgetrunningserver('');
catch
word = actxserver('');
end;
%設定word屬性為可見
set(word, 'visible', 1);
%返回word檔案控制代碼
documents =
%若測試檔案存在,開啟該測試檔案,否則,新建乙個檔案,並儲存,檔名為測試.doc
if exist(filespec_user,'file');
document = invoke(documents,'open',filespec_user);
else
document = invoke(documents, 'add');
endcontent =
selection =
paragraphformat =
%頁面設定
= 60;
= 45;
= 45;
= 45;
%設定內容起始位置和標題
set(content, 'start',0);
title='測試檔案';
set(content, 'text',title);
set(paragraphformat, 'alignment','wdalignparagraphcenter');
%設定標題字型格式
rr=%設定下面內容的起始位置
end_of_doc = get(content,'end');
set(selection,'start',end_of_doc);
%另起一段
%如果當前工作文件中有圖形存在,通過迴圈將圖形全部刪除
shape=
shape_count=
if shape_count~=0;
for i=1:shape_count;
end;
end;
%隨機產生標準正態分佈隨機數,畫直方圖,並設定圖形屬性
zft=figure('units','normalized','position',...
[0.280469 0.553385 0.428906 0.251302],'visible','off');
set(gca,'position',[0.1 0.2 0.85 0.75]);
data=normrnd(0,1,1000,1);
hist(data);
grid on;
xlabel('考試成績');
ylabel('人數');
%將圖形複製到貼上板
hgexport(zft, '-clipboard');
%將圖形貼上到當前文件裡,並設定圖形屬性為浮於文字上方
'msobringinfrontoftext');
%刪除圖形控制代碼
delete(zft);
無縫線路與放散
無縫道岔鋪設與應力放散施工技術研究 摘要 文章以馬來西亞沙巴鐵路更新改造專案為範例,結合馬來西亞沙巴鐵路的特點,通過對無縫道岔鋪設和應力放散的關鍵技術進行分析和研究,提出了在馬來西亞沙巴鐵路無縫道岔鋪設和應力放散過程中的一些關鍵技術。關鍵詞 無縫道岔 鋪設 應力放散 關鍵技術 1 工程概況 沙巴鐵路...
冷軋無縫管與熱軋無縫管的區別有哪些
工藝上區別 1 冷軋成型鋼允許截面出現區域性屈曲,從而可以充分利用桿件屈曲後的承載力 而熱軋型鋼不允許截面發生區域性屈曲。2 熱軋型鋼和冷軋型鋼殘餘應力產生的原因不同,所以截面上的分布也有很大差異。冷彎薄壁型鋼截面上的殘餘應力分布是彎曲型的,而熱扎型鋼或焊接型鋼截面上殘餘應力分布是薄膜型。3 熱軋型...
MATLAB命令與函式大全
matlab命令 matlab commands and functions lista a abs 絕對值 模 字元的ascii碼值 acos 反余弦 acosh 反雙曲余弦 acot 反餘切 acoth 反雙曲餘切 acsc 反餘割 acsch 反雙曲餘割 align 啟 形物件幾何位置排列工具...