Simplification d'une fonction qui écrit dans un fichier Excel

**abel413** · 20/06/2013, 12h23

Bonjour à tous,

Voici une fonction que j'ai écrite laquelle est destinée à écrire des résultats dans un fichier Excel et notamment sur différentes feuilles.

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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
function write_evenement_reflux(repertoire,tableau_final,RR,evenements_Imp1_liquide,evenements_Imp1_melange,evenements_Imp1_gazeux,evenements_Imp2_liquide,evenements_Imp2_melange,evenements_Imp2_gazeux,evenements_Imp3_liquide,evenements_Imp3_melange,evenements_Imp3_gazeux,evenements_Imp4_liquide,evenements_Imp4_melange,evenements_Imp4_gazeux,evenements_Imp5_liquide,evenements_Imp5_melange,evenements_Imp5_gazeux,evenements_Imp6_liquide,evenements_Imp6_melange,evenements_Imp6_gazeux)
 
T0=strcat(repertoire, '_result'); %ils s'agit de 'repertoire_result'
 
%Données utiles pour le tableau final
 
T1='debut';
T2='fin';
T2bis='duree';
T3='pH';
T4='acidité';
T5='type';
T6='IMP1';
T7='IMP2';
T8='IMP3';
T9='IMP4';
T10='IMP5';
T11='IMP6';
T12='seuils';
T13='evenements_Imp1_liquide';
T14='evenements_Imp1_melange';
T15='evenements_Imp1_gazeux';
T16='evenements_Imp2_liquide';
T17='evenements_Imp2_melange';
T18='evenements_Imp2_gazeux';
T19='evenements_Imp3_liquide';
T20='evenements_Imp3_melange';
T21='evenements_Imp3_gazeux';
T22='evenements_Imp4_liquide';
T23='evenements_Imp4_melange';
T24='evenements_Imp4_gazeux';
T25='evenements_Imp5_liquide';
T26='evenements_Imp5_melange';
T27='evenements_Imp5_gazeux';
T28='evenements_Imp6_liquide';
T29='evenements_Imp6_melange';
T30='evenements_Imp6_gazeux';
 
%ecriture du tableau final dans la feuille result
 
xlswrite(T0,{T1},'result','A1');
xlswrite(T0,{T2},'result','B1');
xlswrite(T0,{T3},'result','C1');
xlswrite(T0,{T4},'result','D1');
xlswrite(T0,{T5},'result','E1');
xlswrite(T0,{T6},'result','F1');
xlswrite(T0,{T7},'result','G1');
xlswrite(T0,{T8},'result','H1');
xlswrite(T0,{T9},'result','I1');
xlswrite(T0,{T10},'result','J1');
xlswrite(T0,{T11},'result','K1');
xlswrite(T0,tableau_final,'result','A2');
 
%ecriture des seuils dans la feuille seuils
 
xlswrite(T0,{T12},'seuils','A1');
xlswrite(T0,RR(1,:),'seuils','A2');
xlswrite(T0,RR(2,:),'seuils','A3');
xlswrite(T0,RR(3,:),'seuils','A4');
xlswrite(T0,RR(4,:),'seuils','A5');
xlswrite(T0,RR(5,:),'seuils','A6');
xlswrite(T0,RR(6,:),'seuils','A7');
 
%ecriture des différents événements par piste et domaines
 
%piste 1
 
xlswrite(T0,{T13},'11','A1');
xlswrite(T0,{T1},'11','A2');
xlswrite(T0,{T2},'11','B2');
xlswrite(T0,{T2bis},'11','C2');
xlswrite(T0,evenements_Imp1_liquide,'11','A3');
xlswrite(T0,{T14},'12','A1');
xlswrite(T0,{T1},'12','A2');
xlswrite(T0,{T2},'12','B2');
xlswrite(T0,{T2bis},'12','C2');
xlswrite(T0,evenements_Imp1_melange,'12','A3');
xlswrite(T0,{T15},'13','A1');
xlswrite(T0,{T1},'13','A2');
xlswrite(T0,{T2},'13','B2');
xlswrite(T0,{T2bis},'13','C2');
xlswrite(T0,evenements_Imp1_gazeux,'13','A3');
 
%piste 2
 
xlswrite(T0,{T16},'21','A1');
xlswrite(T0,{T1},'21','A2');
xlswrite(T0,{T2},'21','B2');
xlswrite(T0,{T2bis},'21','C2');
xlswrite(T0,evenements_Imp2_liquide,'21','A3');
xlswrite(T0,{T17},'22','A1');
xlswrite(T0,{T1},'22','A2');
xlswrite(T0,{T2},'22','B2');
xlswrite(T0,{T2bis},'22','C2');
xlswrite(T0,evenements_Imp2_melange,'22','A3');
xlswrite(T0,{T18},'23','A1');
xlswrite(T0,{T1},'23','A2');
xlswrite(T0,{T2},'23','B2');
xlswrite(T0,{T2bis},'23','C2');
xlswrite(T0,evenements_Imp2_gazeux,'23','A3');
 
%piste 3
 
xlswrite(T0,{T19},'31','A1');
xlswrite(T0,{T1},'31','A2');
xlswrite(T0,{T2},'31','B2');
xlswrite(T0,{T2bis},'31','C2');
xlswrite(T0,evenements_Imp3_liquide,'31','A3');
xlswrite(T0,{T20},'32','A1');
xlswrite(T0,{T1},'32','A2');
xlswrite(T0,{T2},'32','B2');
xlswrite(T0,{T2bis},'32','C2');
xlswrite(T0,evenements_Imp3_melange,'32','A3');
xlswrite(T0,{T21},'33','A1');
xlswrite(T0,{T1},'33','A2');
xlswrite(T0,{T2},'33','B2');
xlswrite(T0,{T2bis},'33','C2');
xlswrite(T0,evenements_Imp3_gazeux,'33','A3');
 
%piste 4
 
xlswrite(T0,{T22},'41','A1');
xlswrite(T0,{T1},'41','A2');
xlswrite(T0,{T2},'41','B2');
xlswrite(T0,{T2bis},'41','C2');
xlswrite(T0,evenements_Imp4_liquide,'41','A3');
xlswrite(T0,{T23},'42','A1');
xlswrite(T0,{T1},'42','A2');
xlswrite(T0,{T2},'42','B2');
xlswrite(T0,{T2bis},'42','C2');
xlswrite(T0,evenements_Imp4_melange,'42','A3');
xlswrite(T0,{T24},'43','A1');
xlswrite(T0,{T1},'43','A2');
xlswrite(T0,{T2},'43','B2');
xlswrite(T0,{T2bis},'43','C2');
xlswrite(T0,evenements_Imp4_gazeux,'43','A3');
 
%piste 5
 
xlswrite(T0,{T25},'51','A1');
xlswrite(T0,{T1},'51','A2');
xlswrite(T0,{T2},'51','B2');
xlswrite(T0,{T2bis},'51','C2');
xlswrite(T0,evenements_Imp5_liquide,'51','A3');
xlswrite(T0,{T26},'52','A1');
xlswrite(T0,{T1},'52','A2');
xlswrite(T0,{T2},'52','B2');
xlswrite(T0,{T2bis},'52','C2');
xlswrite(T0,evenements_Imp5_melange,'52','A3');
xlswrite(T0,{T27},'53','A1');
xlswrite(T0,{T1},'53','A2');
xlswrite(T0,{T2},'53','B2');
xlswrite(T0,{T2bis},'53','C2');
xlswrite(T0,evenements_Imp5_gazeux,'53','A3');
 
%piste 6
 
xlswrite(T0,{T28},'61','A1');
xlswrite(T0,{T1},'61','A2');
xlswrite(T0,{T2},'61','B2');
xlswrite(T0,{T2bis},'61','C2');
xlswrite(T0,evenements_Imp6_liquide,'61','A3');
xlswrite(T0,{T29},'62','A1');
xlswrite(T0,{T1},'62','A2');
xlswrite(T0,{T2},'62','B2');
xlswrite(T0,{T2bis},'62','C2');
xlswrite(T0,evenements_Imp6_melange,'62','A3');
xlswrite(T0,{T30},'63','A1');
xlswrite(T0,{T1},'63','A2');
xlswrite(T0,{T2},'63','B2');
xlswrite(T0,{T2bis},'63','C2');
xlswrite(T0,evenements_Imp3_gazeux,'63','A3');

La fonction marche avec des vecteurs adéquats passés en paramètres mais comme vous le voyez j'appelle xlswrite un nombre considérable de fois et de ce fait la fonction est assez lente. Je voudrais donc pouvoir simplifier la fonction, appeler xlswrite le moins de fois possibles, bref faire le travail en "une fois".

**Dombrai** · 20/06/2013, 13h55

salut,

tu seras obligé de faire un xlswrite par feuille il me semble.

Ce que tu peux faire, c'est créer un tableau de cellules, et appeler xlswrite uniquement sur la cellule "en haut a gauche" de ton fichier excel.

bon c'est pas super clair, mais par exemple, je pense que faire

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
Tableau_cellule = Cell(1,11)
 
 
Tableau_cellule{1,1} = T1
Tableau_cellule{1,2} = T2
Tableau_cellule{1,3} = T3
Tableau_cellule{1,4} = T4
Tableau_cellule{1,5} = T5
Tableau_cellule{1,6} = T6
Tableau_cellule{1,7} = T7
Tableau_cellule{1,8} = T8
Tableau_cellule{1,9} = T9
Tableau_cellule{1,10} = T10
Tableau_cellule{1,11} = T11
 
xlswrite(T0,Tableau_cellule,'result','A1');

remplace efficacement

Code :

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

1
2
3
4
5
6
7
8
9
10
11
xlswrite(T0,{T1},'result','A1');
xlswrite(T0,{T2},'result','B1');
xlswrite(T0,{T3},'result','C1');
xlswrite(T0,{T4},'result','D1');
xlswrite(T0,{T5},'result','E1');
xlswrite(T0,{T6},'result','F1');
xlswrite(T0,{T7},'result','G1');
xlswrite(T0,{T8},'result','H1');
xlswrite(T0,{T9},'result','I1');
xlswrite(T0,{T10},'result','J1');
xlswrite(T0,{T11},'result','K1');

**abel413** · 20/06/2013, 14h49

D'accord, merci Dombrai pour cette très bonne idée (à laquelle d'ailleurs je pensais également, mais j'ai beaucoup de mal à la mettre en oeuvre) ; j'ai donc suivi ce que tu me dis et pour le début du code j'ai donc ceci :

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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
function write_evenement_reflux_opt(repertoire,tableau_final,RR,evenements_Imp1_liquide,evenements_Imp1_melange,evenements_Imp1_gazeux,evenements_Imp2_liquide,evenements_Imp2_melange,evenements_Imp2_gazeux,evenements_Imp3_liquide,evenements_Imp3_melange,evenements_Imp3_gazeux,evenements_Imp4_liquide,evenements_Imp4_melange,evenements_Imp4_gazeux,evenements_Imp5_liquide,evenements_Imp5_melange,evenements_Imp5_gazeux,evenements_Imp6_liquide,evenements_Imp6_melange,evenements_Imp6_gazeux)
 
T0=strcat(repertoire, '_result'); %ils s'agit de 'repertoire_result'
 
%Données utiles
 
T1='debut';
T2='fin';
T2bis='duree';
T3='pH';
T4='acidité';
T5='type';
T6='IMP1';
T7='IMP2';
T8='IMP3';
T9='IMP4';
T10='IMP5';
T11='IMP6';
T12='seuils';
T13='evenements_Imp1_liquide';
T14='evenements_Imp1_melange';
T15='evenements_Imp1_gazeux';
T16='evenements_Imp2_liquide';
T17='evenements_Imp2_melange';
T18='evenements_Imp2_gazeux';
T19='evenements_Imp3_liquide';
T20='evenements_Imp3_melange';
T21='evenements_Imp3_gazeux';
T22='evenements_Imp4_liquide';
T23='evenements_Imp4_melange';
T24='evenements_Imp4_gazeux';
T25='evenements_Imp5_liquide';
T26='evenements_Imp5_melange';
T27='evenements_Imp5_gazeux';
T28='evenements_Imp6_liquide';
T29='evenements_Imp6_melange';
T30='evenements_Imp6_gazeux';
 
Tableau_cellule1 = cell(1,30)
Tableau_cellule1{1,1} = T1;
Tableau_cellule1{1,2} = T2;
Tableau_cellule1{1,3} = T3;
Tableau_cellule1{1,4} = T4;
Tableau_cellule1{1,5} = T5;
Tableau_cellule1{1,6} = T6;
Tableau_cellule1{1,7} = T7;
Tableau_cellule1{1,8} = T8;
Tableau_cellule1{1,9} = T9;
Tableau_cellule1{1,10} = T10;
Tableau_cellule1{1,11} = T11;
Tableau_cellule1{1,12} = T12;
Tableau_cellule1{1,13} = T13;
Tableau_cellule1{1,14} = T14;
Tableau_cellule1{1,15} = T15;
Tableau_cellule1{1,16} = T16;
Tableau_cellule1{1,17} = T17;
Tableau_cellule1{1,18} = T18;
Tableau_cellule1{1,19} = T19;
Tableau_cellule1{1,20} = T20;
Tableau_cellule1{1,21} = T21;
Tableau_cellule1{1,22} = T22;
Tableau_cellule1{1,23} = T23;
Tableau_cellule1{1,24} = T24;
Tableau_cellule1{1,25} = T25;
Tableau_cellule1{1,26} = T26;
Tableau_cellule1{1,27} = T27;
Tableau_cellule1{1,28} = T28;
Tableau_cellule1{1,29} = T29;
Tableau_cellule1{1,30} = T30;
 
%ecriture du tableau final dans la feuille result
 
xlswrite(T0,Tableau_cellule1(1:11),'result','A1');
xlswrite(T0,tableau_final,'result','A2');

J'écris donc simplement les 11 premières lignes de Tableau_cellule1 afin d'obtenir dans la feuille result, debut, fin, ect et à partir de A2 j'écris donc le contenu de tableau_final.

Pour la suite j'ignore si on peut procéder de la même façon :

Code :

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

1
2
3
4
5
6
7
8
9
%ecriture des seuils dans la feuille seuils
 
xlswrite(T0,{T12},'seuils','A1');
xlswrite(T0,RR(1,:),'seuils','A2');
xlswrite(T0,RR(2,:),'seuils','A3');
xlswrite(T0,RR(3,:),'seuils','A4');
xlswrite(T0,RR(4,:),'seuils','A5');
xlswrite(T0,RR(5,:),'seuils','A6');
xlswrite(T0,RR(6,:),'seuils','A7');

Pour ceci le {T12} n'est autre que Tableau_cellule1(1,12) donc je pense que je peux laisser la ligne telle quelle. Pour les autres, j'écris le contenu des lignes de RR mais j'apppelle ainsi 6 fois. Peux-ton faire autrement ? Je pourrais faire un for j'imagine mais je voudrais éviter toute boucle.

Enfin, on a après, en gros, 6 fois le même 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
%piste 1
 
xlswrite(T0,{T13},'11','A1');
xlswrite(T0,{T1},'11','A2');
xlswrite(T0,{T2},'11','B2');
xlswrite(T0,{T2bis},'11','C2');
xlswrite(T0,evenements_Imp1_liquide,'11','A3');
xlswrite(T0,{T14},'12','A1');
xlswrite(T0,{T1},'12','A2');
xlswrite(T0,{T2},'12','B2');
xlswrite(T0,{T2bis},'12','C2');
xlswrite(T0,evenements_Imp1_melange,'12','A3');
xlswrite(T0,{T15},'13','A1');
xlswrite(T0,{T1},'13','A2');
xlswrite(T0,{T2},'13','B2');
xlswrite(T0,{T2bis},'13','C2');
xlswrite(T0,evenements_Imp1_gazeux,'13','A3');

Je pourrais par exemple faire une fonction qui fais les lignes précédentes mais je n’exploite donc plus le tableau de cellule.

EDIT:

J'ai essayé de prolonger le tableau de cellule :

Code :

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

1
2
3
4
5
6
Tableau_cellule1{1,31} = RR(1,:);
Tableau_cellule1{1,32} = RR(2,:);
Tableau_cellule1{1,33} = RR(3,:);
Tableau_cellule1{1,34} = RR(4,:);
Tableau_cellule1{1,35} = RR(5,:);
Tableau_cellule1{1,36} = RR(6,:);

et d'écrire ensuite le contenu de RR comme suit :

Code :

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

xlswrite(T0,Tableau_cellule1(31:36),'seuils','A2');

Mais ceci ne fonctionne pas car, par exemple RR(1,:) n'est pas vu comme une ligne de nombres : RR(1,:) devrait être la ligne -700 2000

**Dombrai** · 20/06/2013, 15h11

Code :

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

1
2
3
4
5
6
7
8
9
%ecriture des seuils dans la feuille seuils
 
xlswrite(T0,{T12},'seuils','A1');
xlswrite(T0,RR(1,:),'seuils','A2');
xlswrite(T0,RR(2,:),'seuils','A3');
xlswrite(T0,RR(3,:),'seuils','A4');
xlswrite(T0,RR(4,:),'seuils','A5');
xlswrite(T0,RR(5,:),'seuils','A6');
xlswrite(T0,RR(6,:),'seuils','A7');

bon je suppose que RR est une matrice de chiffres non?

dans ce cas, un simple

Code :

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

xlswrite(T0,RR,'seuils','A2');

devrait suffire

pour le reste, tu peux créer 3 tableaux de cellules 2*3 et faire précedemment. De toute façon, tu seras obligé d'appeler xlswrite a chaque fois que tu changes de page excel

**abel413** · 20/06/2013, 15h34

Merci, effectivement je me suis compliqué inutilement, il suffit d'appeler RR comme tu le préconises.

Ensuite, malheureusement, je ne comprends pas bien comment je pourrais faire ces fameux tableaux de cellules 3*2. Entre ce que je veux écrire pour piste 1 et les autres, il y a pas mal de choses communes. Peut-être devrais-je simplement faire une fonction comme suit :

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
 
function write_piste(T0,T13,T14,T15,T1,T2,T2bis,evenements..ect)
 
xlswrite(T0,{T13},'11','A1');
xlswrite(T0,{T1},'11','A2');
xlswrite(T0,{T2},'11','B2');
xlswrite(T0,{T2bis},'11','C2');
xlswrite(T0,evenements_Imp1_liquide,'11','A3');
xlswrite(T0,{T14},'12','A1');
xlswrite(T0,{T1},'12','A2');
xlswrite(T0,{T2},'12','B2');
xlswrite(T0,{T2bis},'12','C2');
xlswrite(T0,evenements_Imp1_melange,'12','A3');
xlswrite(T0,{T15},'13','A1');
xlswrite(T0,{T1},'13','A2');
xlswrite(T0,{T2},'13','B2');
xlswrite(T0,{T2bis},'13','C2');
xlswrite(T0,evenements_Imp1_gazeux,'13','A3');

Puis je l'appelle 6 fois en changeant les paramètres selon la piste mais j'ai bien peur que je n'y gagne rien.

EDIT:

En fait, pardon, il y a quelque chose que j'ai négligé dans tes propos plus haut : tu me dis, en effet, que je serai obligé d’appeler xlswrite pour chaque feuille. Du coup, si je m'en tiens à ton raisonnement, je serai obligé de l’appeler au minimum 18 fois : 11,12,13,21,....

EDIT2:

Je remarque aussi que je peux reformuler le code comme suit, par exemple pour la piste 1 :

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
%piste 1
 
xlswrite(T0,evenements_Imp1_liquide,'11','A3');
xlswrite(T0,evenements_Imp1_melange,'12','A3');
xlswrite(T0,evenements_Imp1_gazeux,'13','A3');
 
xlswrite(T0,{T13},'11','A1');
xlswrite(T0,{T14},'12','A1');
xlswrite(T0,{T15},'13','A1');
 
xlswrite(T0,{T1},'11','A2');
xlswrite(T0,{T1},'12','A2');
xlswrite(T0,{T1},'13','A2');
 
xlswrite(T0,{T2},'11','B2');
xlswrite(T0,{T2},'12','B2');
xlswrite(T0,{T2},'13','B2');
 
xlswrite(T0,{T2bis},'11','C2');
xlswrite(T0,{T2bis},'12','C2');
xlswrite(T0,{T2bis},'13','C2');

Ensuite pour la piste 2 ce qui va changer c'est que un "1" doit être remplacé par "2" déjà : ai niveau de "evenements_Imp1_liquide" et les deux autres puis toutes les feuilles ('11', '12' ect) doivent commencer par 2 et non par 1. Le problème gênant c'est que T13,T14,T15 doivent eux être remplacés par T16,T17,T18. Ainsi pour la piste 2 le code serait :

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
%piste 2
 
xlswrite(T0,evenements_Imp2_liquide,'21','A3');
xlswrite(T0,evenements_Imp2_melange,'22','A3');
xlswrite(T0,evenements_Imp2_gazeux,'23','A3');
 
xlswrite(T0,{T16},'21','A1');
xlswrite(T0,{T17},'22','A1');
xlswrite(T0,{T18},'23','A1');
 
xlswrite(T0,{T1},'21','A2');
xlswrite(T0,{T1},'22','A2');
xlswrite(T0,{T1},'23','A2');
 
xlswrite(T0,{T2},'21','B2');
xlswrite(T0,{T2},'22','B2');
xlswrite(T0,{T2},'23','B2');
 
xlswrite(T0,{T2bis},'21','C2');
xlswrite(T0,{T2bis},'22','C2');
xlswrite(T0,{T2bis},'23','C2');

Peut-être cela peut-il aider dans la simplification ?

**Dombrai** · 20/06/2013, 16h14

ce que je sous-entendais par Cellules 3*3 (et pas 2*3) c'était de faire

Code :

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

1
2
3
4
5
6
7
8
9
Tab_cellules_piste = cell(3,3)
 
Tab_cellules_piste{1,1} = T13;
Tab_cellules_piste{2,1} = T1;
Tab_cellules_piste{3,1} = events_impl_liquide;
Tab_cellules_piste{2,2} = T2;
Tab_cellules_piste{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste,'11','A1');

et ce pour chacune des feuilles

t'auras effectivement 18 xlswrite, mais tu peux pas vraiment y couper.

la faiblesse de cette méthode c'est que xlswrite ouvre écrit puis ferme le fichier à chaque fois que tu l'appelles. tu pourrais aussi utiliser Automaton qui ouvrirait ton fichier une seule fois puis le fermerait a la fin.

Invité · 20/06/2013, 16h23

Envoyé par Dombrai

la faiblesse de cette méthode c'est que xlswrite ouvre écrit puis ferme le fichier à chaque fois que tu l'appelles. tu pourrais aussi utiliser Automaton qui ouvrirait ton fichier une seule fois puis le fermerait a la fin.

Ou la fonction xlswrite1 du File Exchange.

**abel413** · 21/06/2013, 08h59

Merci Dombrai, apparemment il y a toujours ce problème avec la ligne suivante :

Code :

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

Tab_cellules_piste{3,1} =evenements_Imp1_liquide;

Le contenu de evenements_Imp1_liquide n'est pas écrit dans le fichier Excel. Je crois que je vais devoir l'écrire à part à nouveau.

Merci Winjerome, je vais regarder cette fonction qui apparemment ressemble à un "plugin".

**abel413** · 21/06/2013, 09h51

Bon, j'ai donc la fonction qui suit mais reste tout de même lente (>1 minute d'exécution) :

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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
function write_evenement_reflux_opt(repertoire,tableau_final,RR,evenements_Imp1_liquide,evenements_Imp1_melange,evenements_Imp1_gazeux,evenements_Imp2_liquide,evenements_Imp2_melange,evenements_Imp2_gazeux,evenements_Imp3_liquide,evenements_Imp3_melange,evenements_Imp3_gazeux,evenements_Imp4_liquide,evenements_Imp4_melange,evenements_Imp4_gazeux,evenements_Imp5_liquide,evenements_Imp5_melange,evenements_Imp5_gazeux,evenements_Imp6_liquide,evenements_Imp6_melange,evenements_Imp6_gazeux)
 
T0=strcat(repertoire, '_result'); %ils s'agit de 'repertoire_result'
 
%Données utiles
 
T1='debut';
T2='fin';
T2bis='duree';
T3='pH';
T4='acidité';
T5='type';
T6='IMP1';
T7='IMP2';
T8='IMP3';
T9='IMP4';
T10='IMP5';
T11='IMP6';
T12='seuils';
 
 
T13='evenements_Imp1_liquide';
T14='evenements_Imp1_melange';
T15='evenements_Imp1_gazeux';
T16='evenements_Imp2_liquide';
T17='evenements_Imp2_melange';
T18='evenements_Imp2_gazeux';
T19='evenements_Imp3_liquide';
T20='evenements_Imp3_melange';
T21='evenements_Imp3_gazeux';
T22='evenements_Imp4_liquide';
T23='evenements_Imp4_melange';
T24='evenements_Imp4_gazeux';
T25='evenements_Imp5_liquide';
T26='evenements_Imp5_melange';
T27='evenements_Imp5_gazeux';
T28='evenements_Imp6_liquide';
T29='evenements_Imp6_melange';
T30='evenements_Imp6_gazeux';
T31='-700 2000';
 
Tableau_cellule1 = cell(1,11);
Tableau_cellule1{1,1} = T1;
Tableau_cellule1{1,2} = T2;
Tableau_cellule1{1,3} = T3;
Tableau_cellule1{1,4} = T4;
Tableau_cellule1{1,5} = T5;
Tableau_cellule1{1,6} = T6;
Tableau_cellule1{1,7} = T7;
Tableau_cellule1{1,8} = T8;
Tableau_cellule1{1,9} = T9;
Tableau_cellule1{1,10} = T10;
Tableau_cellule1{1,11} = T11;
 
 
%ecriture du tableau final dans la feuille result
 
xlswrite(T0,Tableau_cellule1(1:11),'result','A1');
xlswrite(T0,tableau_final,'result','A2');
 
%ecriture des seuils dans la feuille seuils
 
xlswrite(T0,{T12},'seuils','A1');
xlswrite(T0,RR,'seuils','A2');
 
%ecriture des différents événements par piste et domaines
 
%piste 1
 
Tab_cellules_piste11 = cell(3,3);
 
Tab_cellules_piste11{1,1} = T13;
Tab_cellules_piste11{2,1} = T1;
Tab_cellules_piste11{2,2} = T2;
Tab_cellules_piste11{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste11,'11','A1');
xlswrite(T0,evenements_Imp1_liquide,'11','A3');
 
Tab_cellules_piste12 = cell(3,3);
 
Tab_cellules_piste12{1,1} = T14;
Tab_cellules_piste12{2,1} = T1;
Tab_cellules_piste12{2,2} = T2;
Tab_cellules_piste12{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste11,'12','A1');
xlswrite(T0,evenements_Imp1_melange,'12','A3');
 
Tab_cellules_piste13 = cell(3,3);
 
Tab_cellules_piste13{1,1} = T15;
Tab_cellules_piste13{2,1} = T1;
Tab_cellules_piste13{2,2} = T2;
Tab_cellules_piste13{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste13,'13','A1');
xlswrite(T0,evenements_Imp1_gazeux,'13','A3');
 
%piste 2
 
Tab_cellules_piste21 = cell(3,3);
 
Tab_cellules_piste21{1,1} = T16;
Tab_cellules_piste21{2,1} = T1;
Tab_cellules_piste21{2,2} = T2;
Tab_cellules_piste21{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste21,'21','A1');
xlswrite(T0,evenements_Imp2_liquide,'21','A3');
 
Tab_cellules_piste22 = cell(3,3);
 
Tab_cellules_piste22{1,1} = T17;
Tab_cellules_piste22{2,1} = T1;
Tab_cellules_piste22{2,2} = T2;
Tab_cellules_piste22{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste22,'22','A1');
xlswrite(T0,evenements_Imp2_melange,'22','A3');
 
Tab_cellules_piste23 = cell(3,3);
 
Tab_cellules_piste23{1,1} = T18;
Tab_cellules_piste23{2,1} = T1;
Tab_cellules_piste23{2,2} = T2;
Tab_cellules_piste23{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste23,'23','A1');
xlswrite(T0,evenements_Imp2_gazeux,'23','A3');
 
%piste 3
 
Tab_cellules_piste31 = cell(3,3);
 
Tab_cellules_piste31{1,1} = T19;
Tab_cellules_piste31{2,1} = T1;
Tab_cellules_piste31{2,2} = T2;
Tab_cellules_piste31{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste31,'31','A1');
xlswrite(T0,evenements_Imp3_liquide,'31','A3');
 
Tab_cellules_piste32 = cell(3,3);
 
Tab_cellules_piste32{1,1} = T20;
Tab_cellules_piste32{2,1} = T1;
Tab_cellules_piste32{2,2} = T2;
Tab_cellules_piste32{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste32,'32','A1');
xlswrite(T0,evenements_Imp3_melange,'32','A3');
 
Tab_cellules_piste33 = cell(3,3);
 
Tab_cellules_piste33{1,1} = T21;
Tab_cellules_piste33{2,1} = T1;
Tab_cellules_piste33{2,2} = T2;
Tab_cellules_piste33{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste33,'33','A1');
xlswrite(T0,evenements_Imp3_gazeux,'33','A3');
 
%piste 4
 
Tab_cellules_piste41 = cell(3,3);
 
Tab_cellules_piste41{1,1} = T22;
Tab_cellules_piste41{2,1} = T1;
Tab_cellules_piste41{2,2} = T2;
Tab_cellules_piste41{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste41,'41','A1');
xlswrite(T0,evenements_Imp4_liquide,'41','A3');
 
Tab_cellules_piste42 = cell(3,3);
 
Tab_cellules_piste42{1,1} = T23;
Tab_cellules_piste42{2,1} = T1;
Tab_cellules_piste42{2,2} = T2;
Tab_cellules_piste42{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste42,'42','A1');
xlswrite(T0,evenements_Imp4_melange,'42','A3');
 
Tab_cellules_piste43 = cell(3,3);
 
Tab_cellules_piste43{1,1} = T24;
Tab_cellules_piste43{2,1} = T1;
Tab_cellules_piste43{2,2} = T2;
Tab_cellules_piste43{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste43,'43','A1');
xlswrite(T0,evenements_Imp4_gazeux,'43','A3');
 
%piste 5
 
Tab_cellules_piste51 = cell(3,3);
 
Tab_cellules_piste51{1,1} = T25;
Tab_cellules_piste51{2,1} = T1;
Tab_cellules_piste51{2,2} = T2;
Tab_cellules_piste51{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste51,'51','A1');
xlswrite(T0,evenements_Imp5_liquide,'51','A3');
 
Tab_cellules_piste52 = cell(3,3);
 
Tab_cellules_piste52{1,1} = T26;
Tab_cellules_piste52{2,1} = T1;
Tab_cellules_piste52{2,2} = T2;
Tab_cellules_piste52{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste52,'52','A1');
xlswrite(T0,evenements_Imp5_melange,'52','A3');
 
Tab_cellules_piste53 = cell(3,3);
 
Tab_cellules_piste53{1,1} = T27;
Tab_cellules_piste53{2,1} = T1;
Tab_cellules_piste53{2,2} = T2;
Tab_cellules_piste53{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste53,'53','A1');
xlswrite(T0,evenements_Imp5_gazeux,'53','A3');
 
%piste 6
 
Tab_cellules_piste61 = cell(3,3);
 
Tab_cellules_piste61{1,1} = T28;
Tab_cellules_piste61{2,1} = T1;
Tab_cellules_piste61{2,2} = T2;
Tab_cellules_piste61{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste61,'61','A1');
xlswrite(T0,evenements_Imp6_liquide,'61','A3');
 
Tab_cellules_piste62 = cell(3,3);
 
Tab_cellules_piste62{1,1} = T29;
Tab_cellules_piste62{2,1} = T1;
Tab_cellules_piste62{2,2} = T2;
Tab_cellules_piste62{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste62,'62','A1');
xlswrite(T0,evenements_Imp6_melange,'62','A3');
 
Tab_cellules_piste63 = cell(3,3);
 
Tab_cellules_piste63{1,1} = T30;
Tab_cellules_piste63{2,1} = T1;
Tab_cellules_piste63{2,2} = T2;
Tab_cellules_piste63{2,3} = T2bis;
 
xlswrite(T0,Tab_cellules_piste63,'63','A1');
xlswrite(T0,evenements_Imp6_gazeux,'63','A3');
 
end

Je pense qu'elle est simplifiable mais je ne suis pas assez habile pour cela, en particulier pour le travail fait sur les pistes : je crée 6 tableaux de cellules dont trois éléments sont les mêmes quelque soit le tableau (élément T1,T2 et T2bis). De plus à partir de "%piste1" j'appelle xlswrite 36 fois car comme je le mentionnais dans mon précédent message, le contenu des vecteurs evenements_quelquechose n'est pas écrit dans le Excel si je le stocke dans une cellule d'un des tableaux de cellule (cf solution de Dombrai).

De plus, de même que dans mon autre sujet consacré à des "boucles for trop lentes", je n'arrive pas à utiliser xlswrite1, par exemple comme suit :

Code :

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

xlswrite1(T0,Tableau_cellule1(1:11),'result','A1');

J'ai aussitôt l'erreur :

Code :

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

1
2
3
4
5
6
7
Undefined function or variable 'Excel'.
 
Error in ==> xlswrite1 at 2
Excel=evalin('base','Excel');
 
Error in ==> write_evenement_reflux_opt at 58
xlswrite1(T0,Tableau_cellule1(1:11),'result','A1');

De toute façon rien qu'avec ceci :

Code :

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

 xlswrite1('test','1','test','A1');

La fonction renvoie l'erreur suivante :

Code :

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

1
2
3
4
??? Undefined function or variable 'Excel'.
 
Error in ==> xlswrite1 at 2
Excel=evalin('base','Excel');

Invité · 21/06/2013, 16h02

La fonction xlswrite1 ne s'utilise pas exactement de la même façon. Lis sa description dans le lien. Tu pourra aussi trouver quelques discussions sur le forum.

Simplification d'une fonction qui écrit dans un fichier Excel

MATLAB

Discussions similaires

Partager

Partager