Plots in excel sheets using matlab

Question

Vikas Saroha 2019-5-21

0
链接

此问题的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/463285-plots-in-excel-sheets-using-matlab

评论： Dheeraj 2023-3-2

I have an excel file with 50 sheets. Each excel sheet has 4 coloumns. I want to plot graph in each excel sheet using 4 coloumns as 4 series of data. How is it possible.

3 个评论
显示 1更早的评论隐藏 1更早的评论

Vikas Saroha 2019-5-21

line connecting all points vs 1,2,3,------till no of rows.

KALYAN ACHARJYA 2019-5-21

编辑：KALYAN ACHARJYA 2019-5-21

Sorry, its not clear to me.

请先登录，再进行评论。

请先登录，再回答此问题。

Answer 1

Bob Thompson 2019-5-21

3
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/463285-plots-in-excel-sheets-using-matlab#answer_376014

If you want to create a plot in the excel sheet directly you need to use the ActXServer capability.

Here is a brief layout of what you're looking for. It's not going to be perfect, but it should get you started. Variable names are optional, but keep track of what they are calling.

rows = 100; % Set number of rows, if variable this gets much tougher
xl = actxserver('Excel.Application');  % Open excel
% set(xl,'Visible',1);                 % Make excel visible
xlsdir = pwd;                          % Set excel to work in current directory
xls = xl.Workbooks.Open('myexcelfile.xlsx');  % Open specific document
xlss = xls.Worksheets;                 % Define worksheet variable, for easier calling
for i = 1:50;
    xlssl = xlss.get('Item',i);        % Select next worksheet
    xlssl.Activate                     % Activate selected worksheet
    xlchart = xlssl.ChartObjects.Add(xloc,yloc,xsize,ysize); % Create a chart in a defined location and size
    xlchart.Chart.Charttype = 'xlxyscattersmoothNoMarkers';  % Set chart type, can adjust as needed
    for j = 1:rows
        xlchart.Chart.SeriesCollection.NewSeries;               % Create an new series
        xlchart.Chart.SeriesCollection(j).Name = seriesname;  % Name the new series. Must be as string!
        xlchart.Chart.SeriesCollection(j).XValues = [1 2 3 4];
                                       % Define xvalues of series
        xlchart.Chart.SeriesCollection(j).Values = xlssl.Range(sprintf('A%i:D%i',j,j));
                                       % Define yvalues of series
        xlchart.Chart.SeriesCollection.Item(j).Format.Line.ForeColor.SchemeColor = 4;
    end
    
    % Useful formatting stuff
    xlchart.Chart.HasTitle = 1;
    xlchart.Chart.Axes(1).HasTitle = 1;
    xlchart.Chart.Axes(2).HasTitle = 1;
    xlchart.Chart.Axes(1).AxisTitle.Text = 'Number';
    xlchart.Chart.Axes(2).AxisTitle.Text = 'Other Number';
    
    % Set Xaxis range
    xlchart.Chart.Axes(1).Minimumscale = 0;
    xlchart.Chart.Axes(2).Minimumscale = 0;
    xlchart.Chart.Axes(1).MaximumScale = 3.0;
    % Activate grid lines
    xlchart.Chart.Axes(1).HasMajorGridlines = 1;
end
xls.Save;                            % Save the document
xl.Quit;                             % Close the document
xl.delete;                           % Remove Excel reference to allow the document to be opened independantly