Inserer une page dans un classeur en dernier

clemclemlapatate -  
Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   -
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

1 réponse

Réponse 1 / 1
Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

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

A+
1
clemclemlapatate
 
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   Statut Membre Dernière intervention   526
  
    With Workbooks("CdS Clement stage.xls")
        Sheets("PdS").Select
        Sheets("PdS").Copy After:=.Sheets(.Sheets.Count)
    End With

A+
0