Lecture/Ecriture feuilles Excel

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

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.

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:

---

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:

---

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

---

Merci bien

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:

---

1 2 3 4

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

---

Merci beaucoup Winjerome :) Je vais faire ça !

Bonne fin de journée :)

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.

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

Ah ! Merci :D Désolée !

Bonne journée :)

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:

---

ActiveSheet = Excel.Worksheets.Item(1);

---

Ah merci :) Je vais essayer ça aussi merci gpcbitnik38