Discussion :

[SouadHadj]

Bonjour à tous,

J'ai un problème, je veux lire et écrire sur plusieurs feuilles dans un même fichier Excel et quand je fais ActiveSheet=....feuille1 après je mets ActiveSheet=....feuille2 l'opération ne s'effectue pas ça reste sur la première feuille. Est ce que vous pouvez m'aider ? Car je ne peux pas utiliser xlsread et xlswrite parce que je dois lire une plage de cellules bien précise.

Merci bien

Cordialement

Souad

[Invité]

Bonjour,

Pourrait-on voir le code en question ?

À noter que les fonctions xslread et xlswrite prennent les arguments sheet et range qui permettent justement de choisir la feuille et les cellules lues/écrites.

[SouadHadj]

Merci Winjerome.

Merci pour cette remarque, ça m’intéresse parce que jusque là j'utilisais xlsread et xlswrite. Je vais regarder ça.

Voici mon 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
% Ouverture de l'application Excel
Excel = actxserver('Excel.Application');
 
Excel.Visible = false;
 
% Chemin du classeur à ouvrir
xlspath = pwd ;
xlsfile = 'fich_in.xlsx';
% Ouverture du classeur
Workbook = Excel.Workbooks.Open(fullfile(xlspath,xlsfile));
 
 
% Récupération de la feuille désirée
ActiveSheet = Excel.Worksheets.Item('Feuille1');
range1=ActiveSheet.Range('C6').get('Resize',30,1).Value;
 
ActiveSheet = Excel.Worksheets.Item('Feuille2');
range2=ActiveSheet.Range('C6').get('Resize',30,1).Value;
 
% % Fermeture du classeur
Workbook.Close(false);
 
% Fermeture de l'application Excel
Quit(Excel);

Ah mais en fait la taille de mes tableaux est dynamique j'aimerais mettre dans mon code à la place de 30 et 1 des variables N et M qui sont calculées auparavant. Cela je n'ai pas pu le faire avec xldread et xlswrite.

comme suit :

Code :

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

range2=ActiveSheet.Range('C6').get('Resize',N,M).Value

Merci bien

[Invité]

Le code me semble correct, à ceci près que par défaut les feuilles se nomment Feuil1, Feuil2... C'est peut-être ce qui pose problème.

Pour des range dynamiques, tu peux regarder cette contribution qui converti les indices, valeurs numériques, en adresse Excel.

Code :

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

1
2
3
4
depart = [6 3]; % C6
M = 2; N = 3;
fin = depart + [N M] - 1;
num2xls([depart ; fin]) % C6:D8

[SouadHadj]

Merci beaucoup Winjerome Je vais faire ça !

Bonne fin de journée

[SouadHadj]

Bonjour Winjerome,

Je n'arrive pas à faire ce que tu m'as dit car je n'ai pas les fonctions num2xls et xls2num. Est ce que tu as d'autres suggéstions ?

Merci bien.

[Invité]

Oui ça je m'en doute que tu ne le as pas vu que c'est moi qui les ai codées
Bouton vert dans mon lien pour les récupérer

[SouadHadj]

Ah ! Merci Désolée !

Bonne journée

[gpcbitnik38]

a noter que tu peux accèder aux feuilles par leur numero dans le classeur
si tu veux accèder a la feuille 1 tu peux utiliser :

Code :

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

ActiveSheet = Excel.Worksheets.Item(1);

[SouadHadj]

Ah merci Je vais essayer ça aussi merci gpcbitnik38