function DeleteSpace
%%删除表格中的空格
%author:axulz
%功能:
%1.实现查表特定表格的空格并删除
%优化方向:
%1.可视化界面GUI
%2.查看表格的多张sheet
%3.将有space空格的单元格标记或者打印出来
%4.多张工作表批量导入
%% ###################################
[TCGFileName,TCGFoldPath] = uigetfile('*.xlsx','选择TCG表');
TCGFilePath=[TCGFoldPath,TCGFileName];%TCG表完整路径
[~,~,AllTCGData]=xlsread(TCGFilePath,'TCMode5');%选择TCG表的TCMode的sheet页
newdata=[]; %预留空数组
for i=1:length(AllTCGData(:,1))%选择工作表的行
for j=1:length(AllTCGData(1,:))%选择工作表的列
% class(AllTCGData{i,j})
if isa(AllTCGData{i,j},'char')%判断选定范围工作区数据的数据类型是否为字符串
newdata{i,j}=strtrim(AllTCGData{i,j});%strtrim函数可去除字符串的首尾空格
else
newdata{i,j}=AllTCGData{i,j};%非字符串格式保留原始数据
end
end
end
ExcelFileName = [TCGFileName(1:end-8),'newTCG.xlsx'];%给新的表格命名
DataFilePath=[TCGFoldPath,ExcelFileName];%放在原有文件夹路径下
if exist(DataFilePath,'file') %若之前文件存在则删除
delete(DataFilePath);
end
xlswrite(DataFilePath,newdata);%将数据写入新建的工作表
end
仅供参考。
用于模型调用单元格内容因出现空格,信号不匹配的