How to create an output excel file after using uitgetfile to select multiple files?

I used uitgetfile with multiselect to perform a calculation for multiple trials at once. I want to create an output file in excel that contains the answers of a calculated variable per trial in one column. With the script used right now, the answers will be overwritten by the following selected file.

script used:

[file_list,path_name] = uigetfile('.xlsx','MultiSelect','on');

if iscell(file_list) == 0

file_list = {file_list};

end

for i = 1:length(file_list)

filename = file_list{i};

data_in = xlsread([path_name, filename]);

x_rf_raw = data_in(:,9); %9 relative xrf data else 1

y_rf_raw = data_in(:,10); %10 relative yrf data else 2

x_s_raw = data_in(:,12); %12 relative xs data else 5

y_s_raw = data_in(:,13); %13 relative ys data else 6

% calculations.....

% Calculated variable (example)

Sum = x_rf_raw + y_rf_raw

%==================== Output ====================

defaultfilename = ['Sum.xlsx'];

defaultoutpathname = [];

[fileout, pathout] = uiputfile([defaultoutpathname,defaultfilename], 'Excel file Save As');

Results_names = {'Sum x and y'};

Results_values = [Sum]

sheet = 1;

xlrange = 'B1';

xlswrite(defaultfilename,Results_values,sheet,xlrange);

end

Answer 1

[Voss]

Collect each file's "Sum" in a cell array inside the loop, and then write it to file after the loop:

[file_list,path_name] = uigetfile('.xlsx','MultiSelect','on');
if iscell(file_list) == 0
    file_list = {file_list};
end
Sum = cell(length(file_list),1);
for i = 1:length(file_list)
    filename = file_list{i};
    data_in = xlsread([path_name, filename]);
    x_rf_raw = data_in(:,9);         %9 relative xrf data else 1
    y_rf_raw = data_in(:,10);         %10 relative yrf data else 2
    x_s_raw = data_in(:,12);          %12 relative xs data else 5
    y_s_raw = data_in(:,13);          %13 relative ys data else 6 
    % calculations.....
    % Calculated variable (example) 
    Sum{i} = x_rf_raw + y_rf_raw;
end

%==================== Output ====================
defaultfilename = ['Sum.xlsx'];
defaultoutpathname = [];
[fileout, pathout] = uiputfile([defaultoutpathname,defaultfilename], 'Excel file Save As');
Results_names = {'Sum x and y'};

all_in_one_column = true;
if all_in_one_column
    % to make all results in one column:
    Results_values = cell2mat(Sum);
else
    % to make each trial its own column:
    N = cellfun(@numel,Sum);
    Results_values = NaN(max(N),numel(Sum));
    for i = 1:numel(Sum)
        Results_values(1:N(i),i) = Sum{i};
    end
end

sheet = 1;
xlrange = 'B1';
xlswrite(fullfile(pathout,fileout),Results_values,sheet,xlrange); % use the specified output file

[enzo Boven]

it gives this error:

Cell contents reference from a non-cell array

object.

Error in cell2mat (line 36)

if isnumeric(c{1}) || ischar(c{1}) ||

islogical(c{1}) || isstruct(c{1})

Error in Selectingexcel (line 178)

Results_values = cell2mat(Sum);

[Voss]

Can you share your script as it is now (with my code incorporated into it)?

[enzo Boven]

clear;

[file_list,path_name] = uigetfile('.xlsx','MultiSelect','on');

if iscell(file_list) == 0

file_list = {file_list};

end

for i = 1:length(file_list)

filename = file_list{i};

data_in = xlsread([path_name, filename]);

%======================== Open file ========================

x_rf_raw = data_in(:,9); %9 relative xrf data else 1

y_rf_raw = data_in(:,10); %10 relative yrf data else 2

x_s_raw = data_in(:,12); %12 relative xs data else 5

y_s_raw = data_in(:,13); %13 relative ys data else 6

%calculations (example)

Sum = x_rf_raw + y_rf_raw

end

%==================== Output ====================

defaultfilename = ['Sum.xlsx'];

defaultoutpathname = [];

[fileout, pathout] = uiputfile([defaultoutpathname,defaultfilename], 'Excel file Save As');

Results_names = {'Sum x and y'};

all_in_one_column = true;

if all_in_one_column

% to make all results in one column:

Results_values = cell2mat(Sum);

else

% to make each trial its own column:

N_output = cellfun(@numel, Sum;

Results_values = NaN(max(N_output),numel(Sum));

for i = 1:numel(Sum)

Results_values(1:N_output(i),i) = Sum{i};

end

end

sheet = 1;

xlrange = 'B1:B60';

xlswrite(fullfile(pathout,fileout),Results_values,sheet,xlrange); % use the specified output file

[Voss]

Notice that I have (at the top, before the for loop):

Sum = cell(length(file_list),1);

and within the for loop:

Sum{i} = x_rf_raw + y_rf_raw;

Make those changes as well in your script and it should run.

In fact, if you copy my code and put a clear at the top, it will have everything you need.

[enzo Boven]

I receive this error

Cell contents reference from a non-cell array

object.

the calculation of the sum is an example, actually i calculated a correlation with the use of

correlation = coerrcoef(x,y)

correlation coefficient = correlation(1,2).

Does that affect the process?

[Voss]

Possibly. I can't say for sure because I haven't seen how you use corrcoef() (not coerrcoef()) in your script.

It is difficult for me to help if you do not post the actual code that is giving an error.

Read about cell arrays.

[enzo Boven]

I fixed the code it works for me. Thanks for your help!

Answer 2

[Fangjun Jiang]

You have the uiputfile() to create or select a new file, you just need to utilize it. Change the last line to

xlswrite(fullfile(pathout,fileout),Results_values,sheet,xlrange);

[enzo Boven]

It still overwrites the previous answers.