VB6 - Modifier l'ordre et changer le nom des feuilles d'un fichier Excel [Résolu]

Signaler
Messages postés
123
Date d'inscription
vendredi 21 janvier 2005
Statut
Membre
Dernière intervention
25 juillet 2007
-
Messages postés
123
Date d'inscription
vendredi 21 janvier 2005
Statut
Membre
Dernière intervention
25 juillet 2007
-
Bonjour.

Depuis mon programme, je crée un fichier Excel. J'ai besoin de rajouter 2 feuilles, mais le problème est que les feuilles rajoutées viennent en 1er : Feuil4 , Feuil5 , Feuil1 etc... Je souhaiterais donc qu'elles viennent à la suite.

De plus, comment changer le nom des feuilles ?

Merci par avance.

3 réponses

Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Modérateur
Dernière intervention
13 mars 2006
14
Salut,
Pour déplacer après la dernière feuille :

Sheets(NomFeuille).Move After:=Sheets(Sheets.Count)

Pour l'ajouter en dernier directement :

Sheets.Add , Sheets(Sheets.Count)
(il y a bien une virgule entre add et sheets)

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 107 internautes nous ont dit merci ce mois-ci

Messages postés
123
Date d'inscription
vendredi 21 janvier 2005
Statut
Membre
Dernière intervention
25 juillet 2007
1
En fait j'ai trouvé.

Après l'ouverture du document et pour rajouter une feuille :

=> FichierExcel.Worksheets.Add

Puis pour changer le nom :

=> FichierExcel.Worksheets(Pag_Excel).Name = NomFeuille
Messages postés
123
Date d'inscription
vendredi 21 janvier 2005
Statut
Membre
Dernière intervention
25 juillet 2007
1
Parfait, c'est ce qui me manquait.

Merci et @+