VBA Excel : problème avec la méthode Add
Bonjour à tous !
Alors voilà, j'ai besoin de générer des fichiers Excel (avec mise en forme, graphiques, etc..) avec matlab. J'ai donc regardé dans l'aide, et trouvé la fonction actxserver. En tâtonnant (je n'ai jamais fais de vba) j'ai trouver de quoi réaliser pas mal de fonction :mouarf:
Code:
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
|
clear all;
% Open Excel, add workbook, change active worksheet,
% get/put array, save, and close
% First open an Excel Server
Excel = actxserver('Excel.Application');
%Affiche ou non la fenetre d'Excel
Excel.Visible = 1;
% Insert a new workbook
Workbooks = Excel.Workbooks;
Workbook = Excel.Workbooks.Add;
%Raccourci
Sheets = Excel.ActiveWorkBook.Sheets;
Charts = Excel.ActiveWorkBook.Charts;
%Supprime les 2 premières feuilles
for var = 1:2
Sheets.Item(1).Delete;
var=var+1;
end
Sheets.Add; %Crée une feuille
Sheets.Item(2).Name = 'MaFeuille2'; %Change son nom
%Sheets.Item('MaFeuille2').Select;
Charts.Add([],Sheets.Item('MaFeuille2'));
Charts.Item(1).Name = 'MonGraph'; |
Comme vous pouvez le voir, ce code me sert juste à me faire la main ;)
La ou j'ai un problème c'est à ce niveau :
Code:
1 2
|
Charts.Add([],Sheets.Item('MaFeuille2')); |
Je lui demande de créer une nouvelle feuille de graph, et de la placer après "Mafeuille2"
Si on regarde les propriétés de la méthode :
Sheets.Add Method
expression.Add(Before, After, Count, Type)
Cela devrait marcher... :(
J'ai mis [] comme valeur "nulle" pour ce paramètre.
Quoi que je fasse, la feuille de graph se positionne avant MaFeuille2 et jamais après comme je le souhaitera 8O
Si quelqu'un pourrait m'éclairer sur la question, cela m'aiderai beaucoup dans mon travail :mrgreen:
En vous remerciant par avance ;)