Sujet Précédent Sujet Suivant

Inserer une page dans un classeur en dernier

Fermé
clemclemlapatate - 7 mai 2014 à 15:18
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 - 7 mai 2014 à 16:25
Bien le bonjour a tous,

Je suis en train de creer un tableur me permettant de remplir un document type,
J'ai creé une macro afin d'inserer mon document type dans un autre classeur(a plusieur reprise),
Mais le probleme est:


Ma page s'insère toujours au meme endroit (aprés la page 2 qui est initialment la derniere).


Quel code utilisé pour qu'il me la mette en derniere a chaque fois?


Voici le code actuelle de ma macro:


Sheets("PdS").Select
Sheets("PdS").Copy After:=Workbooks("CdS Clement stage.xls").Sheets(2)


je cherche a remplacé ce sheets(2) par qqch qui serait: last sheets

D'avance merci!!

et comme le disait mon grand père pirouettes cacahuètes
A voir également:

1 réponse

Réponse 1 / 1
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
7 mai 2014 à 15:47
Bonjour,

Tu peux remplacer sheets(2) par sheets(sheets.count)

A+
1
clemclemlapatate
7 mai 2014 à 16:01
Merci de ton aide!

Malheureusement le sheets count donne le nombre de page de mon tableur et pas de mon document cible...
0
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
7 mai 2014 à 16:25 
    With Workbooks("CdS Clement stage.xls")
        Sheets("PdS").Select
        Sheets("PdS").Copy After:=.Sheets(.Sheets.Count)
    End With

A+
0