Numéro de feuille

[Claudy]

Bonjour,
dans une de mes applications, je voudrais sélectionner la feuille dont le numéro est le plus élevé,
En fait , j'ai un classeur où j'ajoute régulièrement des nouvelles feuilles, mais de temps en temps j'en supprime (les plus anciennes) donc le nombre de feuille (Sheets.count) est différent du numéro de la feuille la plus récente et c'est cette derniére que je voudrais sélectionner en sachant que ce numéro augmente régulièrement!
Mon code:

Sub nouveau_mois()
'c'est ici que au lieu de sélectionner l'activesheet
'il 'faudrait 'sélectionner par exemple la feuil38
'mais le 38 varie et est différent de sheet.Count
ActiveSheet.Copy after:=ActiveSheet
'Merci d'avance

zaza = InputBox('Nouveau mois sous la forme 01/06/2005...', 'Nouveau mois', Date)
Range('B1') = CDate(zaza)
ActiveSheet.Name = Format(Range('b1').Value, 'mmmmyy')
End Sub

 

[Robert]

Bonjour Claudy, bonjour le forum,

Essaie comme ça :
Sheets(Sheets.Count).Copy after:=Sheets(Sheets.Count)

 

[Claudy]

Bonour, et merci, mais ça n'ira pas puisque sheets.count = 33 alors que la feuille aprés laquelle je veux faire un copyafter= 38
a+
merci
claudy

 

[Robert]

Bonjour Claudy, bonjour le forum,

Oui Claudy mais j'ai fait un test et Sheets(Sheets.Count) renvoie la dernière feuille (je ne sais pas pourquoi) quel que soit le nombre et l'index de celles-ci.