VB6 - Modifier l'ordre et changer le nom des feuilles d'un fichier Excel

Résolu
cs_pcvesoul Messages postés 123 Date d'inscription vendredi 21 janvier 2005 Statut Membre Dernière intervention 25 juillet 2007 - 22 sept. 2005 à 12:46
cs_pcvesoul Messages postés 123 Date d'inscription vendredi 21 janvier 2005 Statut Membre Dernière intervention 25 juillet 2007 - 23 sept. 2005 à 05:18
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

cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 18
22 sept. 2005 à 18:59
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
cs_pcvesoul Messages postés 123 Date d'inscription vendredi 21 janvier 2005 Statut Membre Dernière intervention 25 juillet 2007 1
22 sept. 2005 à 12:54
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
0
cs_pcvesoul Messages postés 123 Date d'inscription vendredi 21 janvier 2005 Statut Membre Dernière intervention 25 juillet 2007 1
23 sept. 2005 à 05:18
Parfait, c'est ce qui me manquait.

Merci et @+
0
Rejoignez-nous