循环提前终止：Excel工作表重命名变量未达预期值

架构老林

2026-8-17

问题分析与解决方案

问题核心

你的代码存在两个关键错误导致变量f、g无法达到预期值：

第二个循环开头错误地将f和g重置为1和2，直接破坏了第一个循环的计数延续
循环内反复创建Excel服务器实例并打开/关闭文件，不仅效率极低，还可能因文件锁定或进程残留导致意外终止

修正思路

仅创建一次Excel服务器实例，全程操作同一个工作簿对象，避免反复打开关闭文件
第二个循环继承第一个循环结束后的f、g值，不重置
操作完成后统一关闭工作簿并退出Excel进程，释放资源

修正后的代码

% 初始化Excel服务器与工作簿
myExcel = actxserver('Excel.Application');
excelWorkBook = myExcel.Workbooks.Open('C:\Users\223080038\Desktop\data.xlsx', 0, false);

% 处理第一个列表框(nb)的选中项
f = 1;
g = 2;
nbLen = length(nb);
for i = 1:nbLen
    % 重命名当前项对应的两个工作表
    sheetName1 = [Varlist1{1, nb(1,i)} ' Spectre tension'];
    excelWorkBook.Worksheets.Item(f).Name = sheetName1;
    
    sheetName2 = [Varlist1{1, nb(1,i)} ' Impédence'];
    excelWorkBook.Worksheets.Item(g).Name = sheetName2;
    
    % 更新计数
    f = f + 2;
    g = g + 2;
end

% 处理第二个列表框(ne)的选中项，继承之前的f、g值
neLen = length(ne);
for e = 1:neLen
    sheetName3 = [Varlist2{1, ne(1,e)} ' Spectre Courant'];
    excelWorkBook.Worksheets.Item(f).Name = sheetName3;
    
    sheetName4 = [Varlist2{1, ne(1,e)} ' Spectre tension'];
    excelWorkBook.Worksheets.Item(g).Name = sheetName4;
    
    % 更新计数
    f = f + 2;
    g = g + 2;
end

% 保存并关闭资源
excelWorkBook.Save;
excelWorkBook.Close;
myExcel.Quit;
% 释放COM对象，避免残留进程
delete(myExcel);
clear myExcel;