Export von (mehreren) plots nach Excel

WICHTIG: Der Betrieb von goMatlab.de wird privat finanziert fortgesetzt. - Mehr Infos...

Partner:

Forum

Option

[Erweitert]

• Diese Seite per Mail weiterempfehlen

Gehe zu:

Gast


	Beiträge: ---

	Anmeldedatum: ---

	Wohnort: ---

	Version: ---

Verfasst am: 31.03.2009, 20:19 Titel: Export von (mehreren) plots nach Excel

Hallo zusammen,
ich hätte eine Frage zum Export von (mehreren) plots nach Excel. Bislang habe ich folgendes zustande gebracht:

Code:

function PlotInExcel

clear all;
close all;
clc;

a=[1 2 3 4]; %Testweise einfach mal 2 plots
b=[1 2 3 4];
c=[1 1 1 1];

figure1=figure;
plot(a,b)

print -dmeta;
FILE = 'C:\test.xls';
Range ='A20';
Excel = actxserver ('Excel.Application');
Excel.Visible = 0;

if ~exist(FILE,'file')
ExcelWorkbook=Excel.Workbooks.Add;
ExcelWorkbook.SaveAs(FILE);
ExcelWorkbook.Close(false);
end
invoke(Excel.Workbooks,'Open',FILE); %Open the file
ActiveSheet = Excel.ActiveSheet;
ActiveSheetRange = get(ActiveSheet,'Range',Range);
ActiveSheetRange.Select;
ActiveSheetRange.PasteSpecial;
invoke(Excel,'Save');
invoke(Excel,'Quit');
delete(Excel);

figure2=figure;
plot(a,c)

print -dmeta;
FILE = 'C:\test.xls';
Range ='H20';
Excel = actxserver ('Excel.Application');
Excel.Visible = 0;

if ~exist(FILE,'file')
ExcelWorkbook=Excel.Workbooks.Add;
ExcelWorkbook.SaveAs(FILE);
ExcelWorkbook.Close(false);
end
invoke(Excel.Workbooks,'Open',FILE); %Open the file
ActiveSheet = Excel.ActiveSheet;
ActiveSheetRange = get(ActiveSheet,'Range',Range);
ActiveSheetRange.Select;
ActiveSheetRange.PasteSpecial;
invoke(Excel,'Save');
invoke(Excel,'Quit');
delete(Excel);

Funktion ohne Link?

...soweit funktioniert das Ganze auch, allerdings fragt mich Excel immer ob ich die vorhandene Datei ersetzten möchte... das kann man doch sicherlich umgehen? Hätte gerne, dass zum Schluss alle meine Plots vorhanden sind, ohne ständige Nachfragen von Excel...

Besten Dank!!

P.S.: Falls diese Problem einfacher zu lösen ist, bin ich natürlich auch ganz Ohr... Wink

Harald

Forum-Meister


	Beiträge: 24.495

	Anmeldedatum: 26.03.09

	Wohnort: Nähe München

	Version: ab 2017b

Verfasst am: 06.04.2009, 15:21 Titel:

Hallo,

Wie wäre es, wenn man die vorherige Datei ggf. löscht und sie dann neu anlegt?

Code:

if exist(FILE,'file')
delete(FILE)
end
ExcelWorkbook=Excel.Workbooks.Add;
ExcelWorkbook.SaveAs(FILE);
ExcelWorkbook.Close(false);

Funktion ohne Link?

Nur ein Vorschlag...

Gruß,
Harald

crush

Forum-Anfänger


	Beiträge: 17

	Anmeldedatum: 02.06.10

	Wohnort: ---

	Version: ---

Verfasst am: 04.06.2010, 06:48 Titel:

Hallo zusammen, habe gerade mal obigen code zum exportieren der figure nach excel kopiert und es klappt wunderbar. meine frage ist nur was ich in der zeile:

Code:

ActiveSheet = Excel.ActiveSheet;

Funktion ohne Link?

ändern muss, um ein bestimmtes sheet wählen zu können und nicht das was gerade öffen ist.

danke für die antworten


Einstellungen und Berechtigungen
Beiträge der letzten Zeit anzeigen:	Du kannst Beiträge in dieses Forum schreiben. Du kannst auf Beiträge in diesem Forum antworten. Du kannst deine Beiträge in diesem Forum nicht bearbeiten. Du kannst deine Beiträge in diesem Forum nicht löschen. Du kannst an Umfragen in diesem Forum nicht mitmachen. Du kannst Dateien in diesem Forum posten Du kannst Dateien in diesem Forum herunterladen

Impressum | Nutzungsbedingungen | Datenschutz | FAQ |

RSS

Hosted by:

Copyright © 2007 - 2025 goMatlab.de | Dies ist keine offizielle Website der Firma The Mathworks

MATLAB, Simulink, Stateflow, Handle Graphics, Real-Time Workshop, SimBiology, SimHydraulics, SimEvents, and xPC TargetBox are registered trademarks and The MathWorks, the L-shaped membrane logo, and Embedded MATLAB are trademarks of The MathWorks, Inc.