I notice that the input files have three sheets, with two of them empty. I decided that it was potentially important to merge each sheet separately, by name; otherwise the code would be much shorter.
Note: the code will fail to distinguish between sheetnames which are greater than 63 characters long (or, in some cases, even shorter.)
sourcefolder = 'D:\OutputFolder';
destinationfolder = 'D:\mergeddata';
dinfo = dir( fullfile(sourcefolder, '*.xlsx') );
numfile = length(dinfo);
input_data = struct([]);
input_sheets = struct([]);
for K = 1 : numfile
thisfile = fullfile(sourcefolder, dinfo(K).name );
[status, sheets] = xlsfinfo(thisfile);
for sn = 1 : length(sheets)
[~, ~, raw] = xlsread(thisfile, sn);
sheetname = sheets{sn};
sheet_var = genvarname(sheetname);
if ~isfield(input_data, sheet_var)
input_data.(sheet_var) = {};
input_sheets.(sheet_var) = sheetname;
end
input_data.(sheet_var) = [input_data.(sheet_var); raw]
end
end
output_file = fullfile( destinationfolder, 'merged_files.xlsx');
sheet_vars = fieldnames(input_sheets);
for sn = 1 : length(sheet_vars)
sheet_var = sheet_vars{sn};
data_to_write = input_data.(sheet_var);
sheetname = input_sheets.(sheet_var);
xlswrite( output_file, data_to_write, sheetname );
end
