Changement de feuille Excel

faf - 13 nov. 2000 à 14:57
 Grib - 20 nov. 2000 à 14:40
Je cherche à éxécuter un traitement sur toutes les feuilles d'un fichier Excel en faisant abstraction des noms des feuilles ...

ceci ne marche pas:

Do Until (NumFeuille = _ Fex.ActiveWorkbook.Sheets.count)
Fex.ActiveWorkbook.Sheets.Item _(NumFeuille)
NumFeuille = NumFeuille +1
'traitement
Loop

Qqn a un début de piste?
MERCI D'AVANCE

PS : WHHHOUUUAAAZZZZRRRR !!!!!!!!!!!!!!!!

2 réponses

Pas la peine ... j'ai trouvé la réponse sur un autre forum :
il fallait remplacer item par select
0
Si ca peux quand meme te simplifier la life...
For each Sheet in (...).Workbook(NomWkbk).Worksheets()
'traitement sur Sheet
Next Sheet
voilaaa
0
Rejoignez-nous