Discussion :

[chris05]

Bonjour a tous !!!

J'aimerai copier une figure Matlab directement dans un fichier Excel préexistant. J'ai deja trouvé un code qui fonctionne plutot bien :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
function PlotInExcel
   x= {1:10};
   a= cell2mat(x);
   y= {1:10};
   b= cell2mat(y);
   %............plotting..............................................................................................
   plot(a,b);
   xlabel('X Values');
   ylabel('Y Values');
   print -dmeta;   %.................Copying to clipboard
 
   FILE  = 'C:\Documents and Settings\to85607\Desktop\Simulation Matlab avec données Excel\INPUTS.xls';
   Range ='J20';
   %.............excel COM object............................................................................
         Excel = actxserver ('Excel.Application');
 Excel.Visible = 1;
 
 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; %.................Pasting the figure to the selected location
 
%-----------------------------------end of function

Ce code permet de définir l'emplacement du fichier Excel ainsi que la cellule où l'on veut copier l'image. Il ne permet cependant pas de définir dans quelle feuille excel on veut copier la figure.

Pourriez vous m'indiquer quelles modifications je dois apporter à ce code pour pouvoir décider dans quelle feuille Excel la figure sera copiée?

Merci d'avance.

[chris05]

Hum.... Je vois que personne ne repond à mon post...

Aurais-je collé vos brillants cerveaux ou mon problème ne vous semble pas clair?
Si c'est le cas n'hesitez pas à me demander des informations complémentaires!

Il est vrai que ce probleme touche plus à du langage C++ qu'à du matlab (c'est d'ailleurs pour cela que je seche...), peut etre aurais du le poster ailleurs ...

[Caro-Line]

Il est vrai que ce probleme touche plus à du langage C++ qu'à du matlab

Je ne vois pas bien le rapport avec le C++
Je dirais plutôt qu'il faut regarder du côté des macros Excel.

Par contre il est vrai que ta demande est peu commune.
N'ayant pas Excel je ne peux malheureusement pas regarder mais je pense qu'il faut essayer de regarder quelles sont les méthodes de ton objet pour voir si par exemple il a une méthode Sheet (ou Sheets) qui permettrait de sélectionner la feuille.


Sinon pourquoi vouloir à tout prix copier la figure de MATLAB ?
Ne serait-ce pas plus propre de copier les données et faire le graphique dans Excel ?

[Jerome Briot]

Je ne vois pas bien le rapport avec le C++

En effet, c'est plutôt du VBA ici

A tester :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
invoke(Excel.Workbooks,'Open',FILE); %Open the file
 
Sheets = Excel.ActiveWorkBook.Sheets;
sheet_1 = get(Sheets, 'Item', 'feuil1'); % Remplacer feuil1 par le nom de la feuille à activer
sheet_1.Activate
 
ActiveSheet  = Excel.ActiveSheet;
ActiveSheetRange  = get(ActiveSheet,'Range',Range);

(Il y a certainement plus simple...)

[chris05]

Je ne vois pas bien le rapport avec le C++
Je dirais plutôt qu'il faut regarder du côté des macros Excel.

Je ne connais pas grand chose en C++, et encore moins en VBA (d'ou ma confusion, désolé ).

Sinon pourquoi vouloir à tout prix copier la figure de MATLAB ?

Je crée ce programme pour des collègues qui ne connaissent pas Matlab et qui ne veulent pas y avoir à faire.
J'ai donc créé un fichier excel dans lequel les INPUTS sont saisies puis exportés dans matlab. Les OUTPUTS de matlab sont ensuite récupérés pour etre recopiés dans ce meme fichier EXCEL.

Ne serait-ce pas plus propre de copier les données et faire le graphique dans Excel ?

Le probleme est que mon graphique trace 8 Matrices tres volumineuses (environ 10x 20000)et le transfert de données est très très lent...


Merci Dut, ton code fonctionne à la perfection !!

Voici le code définitif de ma fonction (on sait jamais, cela pourrait profiter un jour à quelqu'un ...) :

Code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
%copie la derniere figure active dans un fichier Excel
 
function PlotInExcel (Feuil,Range)
 
   print -dmeta;   %.................Copying to clipboard
 
   FILE  = 'C:\Documents and Settings\to85607\Desktop\Simulation Matlab avec données Excel\INPUTS_simulation_matlab.xls';
 
   %.............excel COM object............................................................................
   Excel = actxserver ('Excel.Application');
   Excel.Visible = 1;
 
   if ~exist(FILE,'file')
       ExcelWorkbook=Excel.Workbooks.Add;
       ExcelWorkbook.SaveAs(FILE);
       ExcelWorkbook.Close(false);
   end
   invoke(Excel.Workbooks,'Open',FILE); %Open the file
   Sheets = Excel.ActiveWorkBook.Sheets;
   sheet_1 = get(Sheets, 'Item', Feuil); % Remplacer feuil1 par le nom de la feuille à activer
   sheet_1.Activate
 
   ActiveSheet  = Excel.ActiveSheet;
   ActiveSheetRange  = get(ActiveSheet,'Range',Range);
   ActiveSheetRange.Select;
   ActiveSheetRange.PasteSpecial; %.................Pasting the figure to the selected location
 
 
%-----------------------------------end of function"PlotInExcel--------------------------------------

Attention : Feuil (feuille ou la figure doit etre copiée) et Range (cellule dans laquelle la figure doit etre copiée) doivent être des chaines de caractères.
La feuille saisie doit obligatoirement exister sinon le programme stop.
Le fichier Excel doit etre fermé au moment de l'execution du programme.




Merci à tous, vous avez été très efficace !!
Je passerai à l'occasion pour répondre à quelques problèmes posé sur votre forum.

Bonne continuation et encore merci !

[flyingEric]

Bonjour,

Cette fonction marche bien, mais je l'ai intégré dans une boucle cad j'ai besoin de mettre plusieurs images dans un fichier excel, mais tu ne peux rien écrire dans ce fichier lorsque ta fonction l'a ouvert déjà... j'ai utilsé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Excel.Quit;

pour le fermer, mais je cherche un moyen 'automatique' qui peut sauvegarder la modification de ce fichier excel pour que mon ordi ne me demande pas enregistrer la modification autant de fois que la valeur n (variable de ma boucle)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

PlotInExcell(Figure,date,strcat('F',int2str((n-1)*32+1),':K',int2str((n-1)*32+1),''));

[Invité]

Bonjour,

Pour cela, tu peux regarder la discussion Confirmation enregistrement.
De plus au lieu de fermer/ouvrir ton fichier autant de fois qu'il y a de figures, tu peux insérer cette boucle à l'intérieur de la fonction (Cf post#4 de la même discussion).

[flyingEric]

Bonjour Jerôme

Merci pour tes aides, c'est effectivement ce que je voulais, j'avais pensé le "save(COM)", mais il ne marche pas...

Bonjour,

Pour cela, tu peux regarder la discussion Confirmation enregistrement.
De plus au lieu de fermer/ouvrir ton fichier autant de fois qu'il y a de figures, tu peux insérer cette boucle à l'intérieur de la fonction (Cf post#4 de la même discussion).