Discussion :

[messariomar]

Bonjour,
j'essaie de colorer des cellules sur excel mais j'arrive pas je ne reçois aucun résultat ni erreur donc je sais pas d'ou ça peut venir mon probléme si quelqu'un peut m'aider ça serai sympa.

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
 
global matrix;% matrice qui sera stocker dans mon fichier excel
[filename, pathname] = uiputfile('*.xls', 'Choose a file name'); 
outname = fullfile(pathname, filename);
xlswrite(outname, matrix );
%ActiviX to color excel cell
% Connect to Excel
Excel = actxserver('excel.application');
% Get Workbook object
WB = Excel.Workbooks.Open(outname);
% Set the color of cell "A1" of Sheet 1 to RGB
WB.Worksheets.Item(1).Range('A1').Interior.Color = hex2dec('00FF00');
% Save Workbook
WB.Save();
% Close Workbook
WB.Close();
% Quit Excel
Excel.Quit();

[Jerome Briot]

Le code fonctionne parfaitement sur ma machine.

[messariomar]

Le code fonctionne parfaitement sur ma machine.

ah oui je comprend tellement pas alors pourquoi ca marche pas,
pourrais je avoir un aperçu de ton code stp.

normalement ce code s’exécute a un clique sur bouton "save".

[messariomar]

avais vous une idée de comment est ce qu'on peut faire pour travailler avec cette forme [dec2base27(4),num2str(1)] dans mon code au lieu de mettre A1,A2 ....

merci encore une fois

[Jerome Briot]

pourrais je avoir un aperçu de ton code stp.

J'ai simplement exécuté ce bout de 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
matrix = rand(5);
 
[filename, pathname] = uiputfile('*.xls', 'Choose a file name'); 
outname = fullfile(pathname, filename);
xlswrite(outname, matrix );
%ActiviX to color excel cell
% Connect to Excel
Excel = actxserver('excel.application');
% Get Workbook object
WB = Excel.Workbooks.Open(outname);
% Set the color of cell "A1" of Sheet 1 to RGB
WB.Worksheets.Item(1).Range('A1').Interior.Color = hex2dec('00FF00');
% Save Workbook
WB.Save();
% Close Workbook
WB.Close();
% Quit Excel
Excel.Quit();

avais vous une idée de comment est ce qu'on peut faire pour travailler avec cette forme [dec2base27(4),num2str(1)] dans mon code au lieu de mettre A1,A2

Tu peux te servir de cette contribution : [Excel] Conversion adresse cellule - indices de tableau