autre prob de saveas

[ylann]

Voila j'ai fait un saveas d'une page y sur une page x le probleme c'est que je ne veux pas que les macro de y s'enregistre dans x es que un de vous aurrez une solution
MERCI D'AVANCE

 

[@+Thierry]

Salut Ylann,

Ben si tu parles de sauver qu'une "page" X donc nous disons une "feuille"...

Tu fais d'abord une Copie de cette feuille dans un nouveau classeur.
Pour ce faire, une macro dans ce style fera l'affaire.

Si tu veux ne copier que la feuille active :
Sub TEST()
ActiveSheet.Copy
ActiveWorkbook.SaveAs "C:\WINNT\Profiles\te\Personal\TOT01.xls"
End Sub


Si tu veux sauver toutes les feuilles
Sub TEST2()
Sheets.Copy
ActiveWorkbook.SaveAs "C:\WINNT\Profiles\te\Personal\TOT02.xls"
End Sub

Voilà pour un moyen de ne pas avoir les macros dans ton nouveau classeur, avec la réserve toutefois que tu n'aies pas de "Private Sub" dans les feuilles en question. (Private Sub sont des macros du Private Module des feuilles)

En espèrant t'avoir éclairé
@+Thierry