Discussion :

[guismoman33]

Voila dans mon programme, lorsque j'appuie sur un bouton il me copie la page au bout du classeur et cette page copier est en page active...Comment gardez l'ancienne comme page active???

[Invité]

Salut

Avant de créer ta page conserve le nom de ta page en cours dans une variable Worksheet, une fois ta nouvelle page crée rappel la valeur de cette variable suivi d'un Activate.

Cela devrait fonctionner (pas testé)

Starec

[ouskel'n'or]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Set MaFeuille = Activesheet
Copie de ta feuille -> ton code de copie
MaFeuille.activate

Edit
Et avant que tu ne nous pose la question :
Pour avoir le N° de la dernière feuille dans ta ligne de copie...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Set MaFeuille = ActiveSheet
ActiveSheet.Copy After:=Sheets(ActiveWorkbook.Sheets.Count)
MaFeuille.Activate

_____________________________________________________
Quelle joie de se casser la tête sur le pb des autres