Boucle pour parcourir les feuilles d'un fichier excelRésolu

Question

Bonjour,
Je reviens encore pour mes problèmes avec un fichier excel.

En effet il est composé de plusieurs feuilles (21) et dans chacune de ces feuilles je souhaiterai executer la meme opération.

Pour l'instant cela ne marche que pour une feuille , lorsque je fait :xlWorkSheet = xlWorkBook.Worksheets(1)

J'ai bien pensé à faire : For i=0 to i=21
f=f+1
xlWorkBook.Worksheets(f)
instructions
next

Mais sans succès car quand j&#8217;exécute le pas a pas détaillé, l'application passe de la boucle For, jusqu&#8217;à la fin du code directement.

J'ai aussi essayé de faire : While i <> 21 
i=i+1
xlWorkBook.Worksheets(i)
instructions
end while


Quelqu'un aurait il une solution ??

Merci d'avance

cs_jopop · Accepted Answer

Salut,

la boucle For en VB c'est pas comac plutôt ? :
Dim i As Integer
For i = 1 to 21
    'du code
Next i
(et non "to i=21")

Sinon y'a aussi le For Each :
Dim ws As Worksheet
For Each ws In xlWorkBook.Worksheets
    'du code
Next

Moundir76 · Answer

Merci Jopop, encore une erreur bête de ma part .

C'était bien " For i=1 to 21 "!

Merci !

Boucle pour parcourir les feuilles d'un fichier excel

2 réponses

Votre réponse

Discussions similaires