Discussion :

[TopCao]

Bonjour,

Une petite question dont je n'ai pas trouvé la réponse dans le forum et la doc.
Est il possible d'insérer une nouvelle colonne dans un fichier Excel via MatLab ?

Merci pour votre aide

[Jerome Briot]

Je ne vois que 2 solutions :

• utiliser ActiveX et VBA (une petite recherche sur ce forum te donnera des exemples de code)
• utiliser XLSREAD pour lire la feuille, modifier les données et écraser la feuille avec XLSWRITE

[TopCao]

hum malheureusement je pense que ce n'est pas trop rentable pour moi d'aller programmer dans un autre langage que je ne connais pas

Je vais essayer avec xlsread et un boucle while

Merci encore

[Jerome Briot]

Tu parles bien "d'insérer" une colonne ?
C'est à dire de mettre une nouvelle colonne entre des colonnes existantes

[TopCao]

oui oui

mais du coup je vais faire autrement : je vais lire les colonnes une à une jusqu'à trouver la premier vide et y ranger mes données.
Ca va trier en sens inverse mais ca ne change pas grand chose pour le résultat final.

[Jerome Briot]

• utiliser ActiveX et VBA (une petite recherche sur ce forum te donnera des exemples de code)

Voici une petite fonction vite faite qui insère une ligne ou un colonne dans la feuille courante d'un fichier xls :

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
function xlsins(xlsname,idx)
 
error(nargchk(2,2,nargin));
 
if ischar(idx) && isletter(idx)
    shift = -4161;
elseif ischar(idx)
    shift = -4121;
elseif isnumeric(idx)
    shift = -4121;
    idx = num2str(idx);
end
 
Excel = actxserver('Excel.Application');
 
Workbooks = Excel.Workbooks;
Workbook = invoke(Workbooks, 'Open',xlsname);
 
Activesheet = Excel.Activesheet;
 
ActivesheetRange = get(Activesheet,'Range',sprintf('%s:%s',idx,idx));
 
invoke(ActivesheetRange,'Insert',shift);
 
Workbook.Save;
invoke(Workbook, 'Close');
 
invoke(Excel, 'Quit');
 
delete(Excel);

Le premier argument est le nom complet (il est impératif d'avoir le chemin complet) du fichier
Le second argument spécifie la ligne ou la colonne où faire l'insertion comme ceci (selon le référencement A1:B1 des cellules sous Excel) :

• si c'est une lettre : insertion de colonne
• si c'est un chiffre : insertion de la ligne

Par exemple :

Code :

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

1
2
% Insertion d'une colonne entre les colonnes B et C
xlsins('d:\chemin\fichier.xls','C')

Code :

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

1
2
% Insertion d'une ligne entre les lignes 3 et 4
xlsins('d:\chemin\fichier.xls','4')

Code :

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

1
2
% Insertion d'une ligne entre les lignes 6 et 7
xlsins('d:\chemin\fichier.xls',7)

L'opération est effectué en arrière plan, et il faut que le fichier soit fermé avant d'exécuter le code.

C'est juste un petit exemple qui peut être grandement amélioré selon le besoin

Note : testé avec Excel 2003 sur Windows XP SP3