【好玩的源碼】 MATLAB操作Excel實(shí)現(xiàn)自動(dòng)化辦公

硬件電子工程師

點(diǎn)擊上方藍(lán)字和“好玩的MATLAB”一起快樂(lè)玩耍吧！
7 K! ?+ r5 J* w+ k9 {6 f

好玩的matlab
! A1 O+ H# `+ {5 x2 a. `帶你解鎖不一樣的matlab新玩法
: u2 L8 g: J; u# q! L) U* J) {. l
因?yàn)槠綍r(shí)比較忙，好久都沒(méi)有更新推文，為了感謝那些一直關(guān)注【好玩的MATLAB】公眾號(hào)的小伙伴，本推文末有送書(shū)活動(dòng)歡迎參加，今天介紹怎么用matlab實(shí)現(xiàn)自動(dòng)化操作Excel，提高生產(chǎn)力，喜歡此推文的小伙伴們記得點(diǎn)贊+關(guān)注+分享。
7 M. e) [2 g% C

' D2 R2 \% f* o1 |+ Q5 y# B% ?
01
$ Z1 O% I2 W8 T! N' p效果演示
  U2 a+ {' J2 z7 I
' G3 N6 C, r8 ?) e! bMATLAB操作Excel實(shí)現(xiàn)自動(dòng)化辦公




MATLAB操作Excel繪畫(huà)（ps:小編女朋友，漂亮吧

. r( N; T9 T5 N) Y- w4 a）
  }  o  }* r! z; T, H

( {1 m+ u6 M4 @* G1 ^2 X8 ~( s: O

NO.1

先創(chuàng)建一個(gè)文檔

clear;clc;close all;%%  =========先創(chuàng)建一個(gè)名為【好玩的MATLAB】excel文檔========================================file_path=[pwd,'\好玩的MATLAB.xlsx'];%設(shè)置當(dāng)前路徑try    Excel=actxGetRunningServer('Excel.Application');%如果Excel 服務(wù)器已經(jīng)打開(kāi)，返回其句柄catch    Excel=actxserver('Excel.Application');%如果Excel服務(wù)器沒(méi)有打開(kāi)，則創(chuàng)建一個(gè)Excel服務(wù)器，并返回句柄endExcel.Visible = 1; %設(shè)置Excel服務(wù)器為可見(jiàn)狀態(tài)pause%如果存在test.xlsx文件,則打開(kāi)文件，若不存在則創(chuàng)建一個(gè),然后保存if exist(file_path,'file')    Workbook=Excel.Workbooks.Open(file_path);%打開(kāi)else    Workbook=Excel.Workbooks.Add;%創(chuàng)建    Workbook.SaveAs(file_path);%保存end
NO.2

返回當(dāng)前工作表句柄

Sheets = Excel.ActiveWorkbook.Sheets;  %激活工作表Sheet1 = Sheets.Item(1);    % 返回第1個(gè)表格句柄Sheet1.Activate;    % 激活第1個(gè)工作表單Sheet1.Name = '好玩的MATLAB';%表單起名字
NO.3
# V6 `( i4 {' h2 R' i  d% ]/ b
頁(yè)面設(shè)置
' n7 o2 t/ X4 P7 }0 c

Sheet1.PageSetup.TopMargin = 60;       % 上邊距40磅Sheet1.PageSetup.BottomMargin = 45;    % 下邊距40磅Sheet1.PageSetup.LeftMargin = 45;      % 左邊距40磅Sheet1.PageSetup.RightMargin = 45;     % 右邊距40磅  PageSetup屬性：
TopMargin         上邊距BottomMargin   下邊距LeftMargin          左邊距RightMargin       右邊距
( e/ h( }* L5 C' h  @& ]" w" A6 kPageSetup屬性設(shè)置參考:https://docs.microsoft.com/zh-cn/office/vba/api/excel.pagesetup
NO.4
0 F. Y' m6 T1 S: F' G# U8 U
設(shè)置行高和列寬
5 }# g9 G1 F7 a; q9 f; H1 ]5 B; L/ h# Y

RowHeight = [96,25,25,25]';%定義行高向量RowHeightSheet1.Range('A1:A4').RowHeight = RowHeight;%設(shè)置Range對(duì)象（從A1到A16）的行高Sheet1.Range('A1:H1').ColumnWidth = [44,8,8,8,8,44,8,8,20];%設(shè)置Range對(duì)象（從A1到H1）的列寬
NO.5

合并單元格
: `" f. m7 J) {2 _7 B- K4 Z

Sheet1.Range('A1:A4').MergeCells = 1;Sheet1.Range('B1:C1').MergeCells = 1;Sheet1.Range('B2:C2').MergeCells = 1;Sheet1.Range('B3:C3').MergeCells = 1;Sheet1.Range('B4:C4').MergeCells = 1;Sheet1.Range('A8:A9').MergeCells = 1;Sheet1.Range('D3:E3').MergeCells = 1;Sheet1.Range('E8:H8').MergeCells = 1;Sheet1.Range('D4:E4').MergeCells = 1;Sheet1.Range('G4:H4').MergeCells = 1;Sheet1.Range('I1:I4').MergeCells = 1;
. V% ?; r: p4 R4 xNO.6
+ X. o  h+ q# T: q$ b) i
設(shè)置單元格的邊框

$ w+ t! `0 A* V7 h

Sheet1.Range('A1:I4').Borders.Weight = 3;Sheet1.Range('A1:I4').Borders.Value=1;% 1：實(shí)線，2：長(zhǎng)虛線；3：短虛線，4：點(diǎn)劃線；5--.Sheet1.Range('A1:I4').Borders.Item(1).LineStyle=1; %單元格邊框%Item(1)為左側(cè)，Item(2)為右側(cè)，Item(3)為上側(cè)，Item(4)為下側(cè)，% Sheet1.Range('A1:I4').Borders.Item(2).LineStyle=4;% Sheet1.Range('A1:I4').Borders.Item(3).LineStyle=3;% Sheet1.Range('A1:I4').Borders.Item(4).LineStyle=4;其中Borders.Value的參數(shù)等于：1：實(shí)線，2：長(zhǎng)虛線；3：短虛線，4：點(diǎn)劃線……
  o' g8 Y5 \; p4 ]0 c6 R/ h1 u
還有許多小編就不一一列舉了！
5 X9 y$ L8 e  |Borders屬性詳解見(jiàn)：https://docs.microsoft.com/zh-CN/office/vba/api/excel.borders
: y8 l# f) z5 P
NO.7

8 B" i' q) t8 R7 z- a填寫(xiě)單元格內(nèi)容
. O  m; N% k2 ~1 }& i! a1 o
添加文字

Sheet1.Range('A1:A4').Value = '畢業(yè)照片';Sheet1.Range('B1:C1').Value = '  姓 名  ';Sheet1.Range('A2:C2').Value = '政治面貌';Sheet1.Range('A3:C3').Value = '通訊地址';Sheet1.Range('A4:C4').Value = 'E-mail';Sheet1.Range('E1').Value = '性別';Sheet1.Range('E2').Value = '健康狀況';Sheet1.Range('F4').Value = '現(xiàn)居住地址';Sheet1.Range('G1').Value = '出生年月';Sheet1.Range('G2').Value = '聯(lián)系電話';Sheet1.Range('G3').Value = '郵政編碼';插入圖片

fig=figure('units','normalized','visible','off');%設(shè)置圖像不可見(jiàn)img=imread('zzx.jpg');img=imresize(img,[50,50]);imshow(img)ax=gca;ax.Position=[0,0,1,1];%將圖形復(fù)制到粘貼板hgexport(fig, '-clipboard');%將圖形粘貼到當(dāng)前表格的A1:B4欄里Excel.ActiveSheet.Range('A1:B4').Select;Excel.ActiveSheet.Paste;
( E  U5 T6 C( c8 W: X# ZNO.8

顏色設(shè)置

6 A3 E& M) L1 |4 O4 Q2 q( d3 E8 hRGB顏色值轉(zhuǎn)換為Excel顏色值遵循公式：
5 C& Z- M! L+ L; k- X
& r% p! o. {) K, l: M. v  Q) r, Q

% EXCEL顏色與RGB顏色換算公式：color=R+2^8*G+2^16*B;% 1、設(shè)置邊框顏色Sheet1.Range('A1:I3').Borders.Color=0+2^8*255+2^16*255;% 2、設(shè)置背景色Sheet1.Range('E1').Interior.Color=255+2^8*0+2^16*0;% 3、字體顏色Sheet1.Range('E2').Characters.Font.Color=0+2^8*255+2^16*0;
; c2 r2 g2 l5 C* n0 h, eNO.9
3 y+ ~6 [. s$ l0 ]  d# f7 \
& |" K% g0 x6 L* C1 c5 R字體設(shè)置
7 m" D  z: \+ j* g( ^) K- i4 Q
6 M7 j% G* U0 I5 c5 k! }+ Q: j

Sheet1.Range('F4').Characters.Font.Name='黑體'; %設(shè)置字體為黑體Sheet1.Range('F4').Characters.Font.Color=0+2^8*0+2^16*255; %文字顏色Sheet1.Range('F4').Characters.Font.ColorIndex=1;%1、黑色  2、白色 3、紅色 4、綠色、5藍(lán)色、6黃色……Sheet1.Range('F4').Characters.Font.Bold=1; %字體加粗Sheet1.Range('G2').Font.FontStyle = "Bold Italic";%字體樣式設(shè)置為加粗和傾斜Sheet1.Range('F4').Characters.Font.Size=30;Sheet1.Range('F4').Characters.Font.Italic=1; %傾斜 %Sheet1.Range('F4').Characters.Font.Underline=2; %1、無(wú)下劃線 2、單下劃線 3、雙下劃線 4、單下劃線 5、雙下劃線Font屬性詳細(xì)見(jiàn)：
https://docs.microsoft.com/zh-cn/office/vba/api/excel.font.size
https://docs.microsoft.com/zh-CN/office/vba/api/excel.font%28object%29
  a1 p; t4 B) ~4 N& U
NO.10

對(duì)齊方式
水平對(duì)齊
; i1 M1 w- K5 e& l, C

Sheet1.Range('A1:C3').HorizontalAlignment = -4108; % 水平居中Sheet1.Range('A1:C3').HorizontalAlignment=-4131; %左對(duì)齊 Sheet1.Range('A1:C3').HorizontalAlignment=-4152;%右對(duì)齊 垂直對(duì)齊
4 w' v6 \$ Y- U9 M+ s( q2 h  y( n" k

Sheet1.Range('A1:C3').VerticalAlignment=-4108; %垂直居中  Sheet1.Range('A1:C3').VerticalAlignment=-4107; %底部對(duì)齊Sheet1.Range('A1:C3').VerticalAlignment = -4160;% 頂部對(duì)齊
  `7 N3 J, h2 U( u' zNO.11
& F$ A  c7 U$ [8 O
2 ?* t% ]/ `( B凍結(jié)
8 q# w& q1 ]" e( ~

% 凍結(jié)第一行% Excel.ActiveWindow.SplitRow = 1;% Excel.ActiveWindow.SplitColumn = 0;% 凍結(jié)第一列% Excel.ActiveWindow.SplitRow = 0;% Excel.ActiveWindow.SplitColumn = 1;
! X1 u" S1 M1 j  g. PNO.12

3 _( |0 e: G7 _; s: B. j' E刪除單元格

hc=Sheet1.Range('F4').Rows; hc.Delete;       %  刪除某個(gè)單元格 hc=Sheet1.Range('F4').EntireRow; hc.Delete   %  刪除整行單元格 hc=Sheet1.Range('F4').EntireColumn;hc.Delete %  刪除整列單元格
  a! N# [1 K1 X" U0 m4 \# T; RNO.13

% f# ~/ j, Q* T0 f退出

% Excel.Quit%退出
MATLAB操作Excel實(shí)現(xiàn)自動(dòng)化辦公全部源碼


【環(huán)境：win10+matlab21b，收藏=學(xué)會(huì)】

%% +++++++++++++++++++++++++++++%   author:2377389590@qq.com%   date:2022-5-21%% +++++++++++++++++++++++++++++clear ;clc;close all;%%  =========先創(chuàng)建一個(gè)名為【好玩的MATLAB】excel文檔========================================file_path=[pwd,'\好玩的MATLAB.xlsx'];%設(shè)置當(dāng)前路徑try    Excel=actxGetRunningServer('Excel.Application');%如果Excel 服務(wù)器已經(jīng)打開(kāi)，返回其句柄catch    Excel=actxserver('Excel.Application');%如果Excel服務(wù)器沒(méi)有打開(kāi)，則創(chuàng)建一個(gè)Excel服務(wù)器，并返回句柄endExcel.Visible = 1; %設(shè)置Excel服務(wù)器為可見(jiàn)狀態(tài)
" W# ?4 o* B9 R" @" _- ~%如果存在test.xlsx文件,則打開(kāi)文件，若不存在則創(chuàng)建一個(gè),然后保存if exist(file_path,'file')    Workbook=Excel.Workbooks.Open(file_path);%打開(kāi)else    Workbook=Excel.Workbooks.Add;%創(chuàng)建    Workbook.SaveAs(file_path);%保存end
%% ====返回當(dāng)前工作表句柄=====================Sheets = Excel.ActiveWorkbook.Sheets;  %激活工作表Sheet1 = Sheets.Item(1);    % 返回第1個(gè)表格句柄Sheet1.Activate;    % 激活第1個(gè)工作表單Sheet1.Name = '好玩的MATLAB';%表單起名字%% =========頁(yè)面設(shè)置==========================Sheet1.PageSetup.TopMargin = 60;       % 上邊距40磅Sheet1.PageSetup.BottomMargin = 45;    % 下邊距40磅Sheet1.PageSetup.LeftMargin = 45;      % 左邊距40磅Sheet1.PageSetup.RightMargin = 45;     % 右邊距40磅
%% =========設(shè)置行高和列寬===================RowHeight = [96,25,25,25]';%定義行高向量RowHeightSheet1.Range('A1:A4').RowHeight = RowHeight;%設(shè)置Range對(duì)象（從A1到A16）的行高Sheet1.Range('A1:H1').ColumnWidth = [44,8,8,8,8,44,8,8,20];%設(shè)置Range對(duì)象（從A1到H1）的列寬%% =========合并單元格======================Sheet1.Range('A1:A4').MergeCells = 1;Sheet1.Range('B1:C1').MergeCells = 1;Sheet1.Range('B2:C2').MergeCells = 1;Sheet1.Range('B3:C3').MergeCells = 1;Sheet1.Range('B4:C4').MergeCells = 1;Sheet1.Range('A8:A9').MergeCells = 1;Sheet1.Range('D3:E3').MergeCells = 1;Sheet1.Range('E8:H8').MergeCells = 1;Sheet1.Range('D4:E4').MergeCells = 1;Sheet1.Range('G4:H4').MergeCells = 1;Sheet1.Range('I1:I4').MergeCells = 1;%% ======設(shè)置單元格的邊框=====================Sheet1.Range('A1:I4').Borders.Weight = 3;Sheet1.Range('A1:I4').Borders.Value=1;% 1：實(shí)線，2：長(zhǎng)虛線；3：短虛線，4：點(diǎn)劃線；5--.
4 E6 E* D: @1 |! aSheet1.Range('A1:I4').Borders.Item(1).LineStyle=1; %單元格邊框%Item(1)為左側(cè)，Item(2)為右側(cè)，Item(3)為上側(cè)，Item(4)為下側(cè)，% Sheet1.Range('A1:I4').Borders.Item(2).LineStyle=4;% Sheet1.Range('A1:I4').Borders.Item(3).LineStyle=3;% Sheet1.Range('A1:I4').Borders.Item(4).LineStyle=4;%% ====寫(xiě)入單元格內(nèi)容=========================% 1、寫(xiě)入文字Sheet1.Range('A1:A4').Value = '畢業(yè)照片';Sheet1.Range('B1:C1').Value = '  姓 名  ';Sheet1.Range('A2:C2').Value = '政治面貌';Sheet1.Range('A3:C3').Value = '通訊地址';Sheet1.Range('A4:C4').Value = 'E-mail';Sheet1.Range('E1').Value = '性別';Sheet1.Range('E2').Value = '健康狀況';Sheet1.Range('F4').Value = '現(xiàn)居住地址';Sheet1.Range('G1').Value = '出生年月';Sheet1.Range('G2').Value = '聯(lián)系電話';Sheet1.Range('G3').Value = '郵政編碼';%% ==========插入圖片================================fig=figure('units','normalized','visible','off');%設(shè)置圖像不可見(jiàn)img=imread('zzx.jpg');img=imresize(img,[50,50]);imshow(img)ax=gca;ax.Position=[0,0,1,1];%將圖形復(fù)制到粘貼板hgexport(fig, '-clipboard');%將圖形粘貼到當(dāng)前表格的A1:B4欄里Excel.ActiveSheet.Range('A1:B4').Select;Excel.ActiveSheet.Paste;
7 y9 h* i, w) l9 a/ r6 [%% =======顏色設(shè)置=========================%  EXCEL顏色與RGB顏色換算公式：color=R+2^8*G+2^16*B;% 1、設(shè)置邊框顏色Sheet1.Range('A1:I3').Borders.Color=0+2^8*255+2^16*255;% 2、設(shè)置背景色Sheet1.Range('E1').Interior.Color=255+2^8*0+2^16*0;% 3、字體顏色Sheet1.Range('E2').Characters.Font.Color=0+2^8*255+2^16*0;
; Q7 R9 o" ?5 Q4 ~" {%% =====寫(xiě)入字體設(shè)置============================%https://docs.microsoft.com/zh-cn/office/vba/api/excel.font.sizeSheet1.Range('F4').Characters.Font.Name='黑體'; %設(shè)置字體為黑體Sheet1.Range('F4').Characters.Font.Color=0+2^8*0+2^16*255; %文字顏色Sheet1.Range('F4').Characters.Font.ColorIndex=1;%1、黑色  2、白色 3、紅色 4、綠色、5藍(lán)色、6黃色&Sheet1.Range('F4').Characters.Font.Bold=1; %字體加粗Sheet1.Range('G2').Font.FontStyle = "Bold Italic";%字體樣式設(shè)置為加粗和傾斜Sheet1.Range('F4').Characters.Font.Size=30;Sheet1.Range('F4').Characters.Font.Italic=1; %傾斜 %Sheet1.Range('F4').Characters.Font.Underline=2; %1、無(wú)下劃線 2、單下劃線 3、雙下劃線 4、單下劃線 5、雙下劃線
, R& R2 u8 D2 m%% =======對(duì)齊方式=====================================% 水平對(duì)齊方式Sheet1.Range('A1:C3').HorizontalAlignment = -4108; % 水平居中Sheet1.Range('A1:C3').HorizontalAlignment=-4131; %左對(duì)齊 Sheet1.Range('A1:C3').HorizontalAlignment=-4152;%右對(duì)齊 %垂直對(duì)齊方式Sheet1.Range('A1:C3').VerticalAlignment=-4108; %垂直居中  Sheet1.Range('A1:C3').VerticalAlignment=-4107; %底部對(duì)齊Sheet1.Range('A1:C3').VerticalAlignment = -4160;% 頂部對(duì)齊%% =======凍結(jié)=====================================% 凍結(jié)第一行% Excel.ActiveWindow.SplitRow = 1;% Excel.ActiveWindow.SplitColumn = 0;% 凍結(jié)第一列% Excel.ActiveWindow.SplitRow = 0;% Excel.ActiveWindow.SplitColumn = 1;
" @; ^# q8 K8 m7 E9 N; ehc=Sheet1.Range('F4').Rows; hc.Delete;       %  刪除某個(gè)單元格 hc=Sheet1.Range('F4').EntireRow; hc.Delete   %  刪除整行單元格 hc=Sheet1.Range('F4').EntireColumn;hc.Delete %  刪除整列單元格 % Excel.Quit%退出
MATLAB操作Excel繪畫(huà)全部源碼
. e! K  k' l) ?0 b- p

! W7 n+ L  D" B9 w! Y8 Z. @簡(jiǎn)單介紹一下Matlab操作Excel繪圖的實(shí)現(xiàn)思路：

讀取圖片；

獲取圖片像素點(diǎn)的顏色值，換算成Excel顏色值；

根據(jù)圖像顏色值填充Excel表的背景色，從而實(shí)現(xiàn)繪圖。
- a1 R7 a; R8 D3 _7 q【環(huán)境：win10+matlab21b，收藏=學(xué)會(huì)，趕快給女盆友畫(huà)一張Excel照片吧！】

clc;clear;close all;%% =======讀取圖片==================================img=imread('女朋友照片.png');img=imresize(img,[200,floor(200/size(img,1)*size(img,2))]);%自適應(yīng)大小%% =========創(chuàng)建并且激活Excel工作表===================file_path=[pwd,'\女朋友照片.xlsx'];%設(shè)置當(dāng)前路徑try    Excel=actxGetRunningServer('Excel.Application');%如果Excel 服務(wù)器已經(jīng)打開(kāi)，返回其句柄catch    Excel=actxserver('Excel.Application');%如果Excel服務(wù)器沒(méi)有打開(kāi)，則創(chuàng)建一個(gè)Excel服務(wù)器，并返回句柄endExcel.Visible = 1; %設(shè)置Excel服務(wù)器為可見(jiàn)狀態(tài)%如果存在文件,則打開(kāi)文件，若不存在則創(chuàng)建一個(gè),然后保存if exist(file_path,'file')    Workbook=Excel.Workbooks.Open(file_path);%打開(kāi)else    Workbook=Excel.Workbooks.Add;%創(chuàng)建    Workbook.SaveAs(file_path);%保存end%------------返回當(dāng)前工作表句柄--------------Sheets = Excel.ActiveWorkbook.Sheets;  %激活工作表Sheet1 = Sheets.Item(1);    % 返回第1個(gè)表格句柄Sheet1.Activate;    % 激活第1個(gè)工作表單Sheet1.Name = '女朋友照片';%表單起名字row=size(img,1);col=size(img,2);%設(shè)置寬度Sheet1.Range(['A1:A',num2str(row)]).RowHeight=ones(1,row);Sheet1.Range(['A1:',num2abc(col),'1']).ColumnWidth=ones(1,col)/20;%% ===========繪制顏色========================================for i=1:row%行數(shù)    for j=1:col%列數(shù)        R=img(i,j,1);        G=img(i,j,2);        B=img(i,j,3);        color=double(R)+256*double(G)+65536*double(B);%對(duì)應(yīng)顏色        columnIdx=num2abc(j);        position=strcat(columnIdx,num2str(i));%字符串連接函數(shù)%         Sheet1.Range(position).Borders.Color=color;%單元格邊框色        Sheet1.Range(position).Interior.Color=color;%單元格背景色填充    endend
- -THE END- -
源碼下載：
gitee下載：https://gitee.com/iDMatlab/excel-server/tree/master
參考資料：
! h% O, c" f1 f& r: @- ^( J【1】感謝微信好友：「閑云野鶴 」參考資料
- V7 N0 W- t% q+ \5 w【2】https://idmatlab.blog.csdn.net/article/details/87458541【3】https://docs.microsoft.com/zh-CN/office/vba/api/excel.borders【4】https://docs.microsoft.com/zh-cn/office/vba/api/excel.pagesetup【5】https://docs.microsoft.com/zh-CN/office/vba/api/excel.font%28object%29【6】https://www.mathworks.com/help/releases/R2020b/matlab/ref/actxgetrunningserver.html【7】https://docs.microsoft.com/zh-cn/office/vba/api/overview/excel/enumerations-graph-visual-basic-reference
【送書(shū)活動(dòng)】
包郵贈(zèng)送2021年新書(shū)《MATLAB智能優(yōu)化算法：從寫(xiě)代碼到算法思想》共5本，這是一本MATLAB語(yǔ)言的新書(shū)籍，剛剛上架！由「 北京大學(xué)出版社」贊助提供 ，感興趣的朋友推薦入手一本。


3 N; f# G, z2 F: ~, p% e$ M. \( v【抽獎(jiǎng)方式及滿足條件】：
1.關(guān)注「好玩的MATLAB 」公眾號(hào)
2 G$ L( J$ {0 x6 A: H7 t0 A2.給本文點(diǎn)【贊】+【在看】；
. d0 Q0 z2 _3 j4 L- c2 s. ?" b3.留言區(qū)評(píng)論點(diǎn)贊最多的前5名。
' u& o- G* F; U; S7 _3 h同時(shí)滿足上述3個(gè)條件的讀者朋友，包郵贈(zèng)送一本：《MATLAB智能優(yōu)化算法：從寫(xiě)代碼到算法思想》

+ q6 L/ `% U' u' y【開(kāi)獎(jiǎng)時(shí)間】 ：2022年5月27日夜晚8:00 (周五)【領(lǐng)獎(jiǎng)方式】：在開(kāi)獎(jiǎng)時(shí)，后臺(tái)將會(huì)回復(fù)點(diǎn)贊最多的前5名小伙伴的留言。后臺(tái)回復(fù)的信息截圖+姓名+地址+聯(lián)系方式發(fā)送小編私人微信：idmatlab，
掃一掃加小編微信
7 z! B  D4 l9 g- t
" @% B7 F" ^* L) I( y7 ^: N+ k

當(dāng)然，沒(méi)有中獎(jiǎng)但有需要的小伙伴可以通過(guò)下方鏈接進(jìn)行購(gòu)買(mǎi)：【本書(shū)亮點(diǎn)】
本書(shū)便以實(shí)戰(zhàn)和快速教會(huì)智能優(yōu)化算法初學(xué)者為主旨，通過(guò)9個(gè)常見(jiàn)的組合優(yōu)化問(wèn)題、5個(gè)經(jīng)典的智能優(yōu)化算法及4個(gè)新穎的智能優(yōu)化算法，讓讀者全面、深入、透徹地理解智能優(yōu)化算法求解問(wèn)題時(shí)的算法設(shè)計(jì)思路及代碼編寫(xiě)思路，進(jìn)一步提高使用智能優(yōu)化算法求解實(shí)際問(wèn)題的實(shí)戰(zhàn)能力。【內(nèi)容簡(jiǎn)介】
本書(shū)以簡(jiǎn)單的組合優(yōu)化問(wèn)題作為MATLAB智能優(yōu)化算法實(shí)戰(zhàn)應(yīng)用的切入點(diǎn)，逐步深入使用MATLAB編寫(xiě)更復(fù)雜的智能優(yōu)化算法和求解更復(fù)雜的組合優(yōu)化問(wèn)題，讓讀者逐漸理解智能優(yōu)化算法的實(shí)際求解過(guò)程。【目錄一覽表】
8 ~  S7 M, U/ E" N* D5 T往下滑動(dòng)查看目錄詳情（1）遺傳算法求解0-1背包問(wèn)題；
0 N$ L+ t1 a) t7 t- Q: `（2）變鄰域搜索算法求解旅行商問(wèn)題
（3）大規(guī)模鄰域搜索算法求解旅行商問(wèn)題
（4）灰狼優(yōu)化算法求解多旅行商問(wèn)題
( t; X2 o- p2 C) @（5）蟻群算法求解容量受限的車(chē)輛路徑問(wèn)題
+ [/ }9 j8 X, \& G& `（6）模擬退火算法求解同時(shí)取送貨的車(chē)輛路徑問(wèn)題
8 o7 R- W9 p+ ]& u1 [（7）遺傳算法求解帶時(shí)間窗的車(chē)輛路徑問(wèn)題
# N! D; i3 @! g+ ^（8）螢火蟲(chóng)算法求解訂單分批問(wèn)題
（9）頭腦風(fēng)暴優(yōu)化算法求解帶時(shí)間窗和同時(shí)取送貨的車(chē)輛路徑問(wèn)題
（10）鯨魚(yú)優(yōu)化算法求解開(kāi)放式車(chē)輛路徑問(wèn)題。
往期精彩回顧
' A( x& ^7 j5 P/ s9 g
推薦 | 【建模算法】擬合推薦 | 【建模算法】插值推薦 | 【高級(jí)繪圖】繪制SCI論文里的堆疊柱狀圖推薦 | 【好玩的源碼】用MATLAB編寫(xiě)GUI腦電信號(hào)采集程序


- s1 e  G' i/ [
4 u; ?! V  Q( e/ }7 S( q
↓↓↓ 點(diǎn)擊"閱讀原文" 【進(jìn)入QQ交流群】