Creer, ouvrir et copier des feuilles dans un classeur

[youki]

Bonjour, je souhaite qu'à la fin de mon useforme en cliquant sur un bouton:

• Une fenetre s'ouvre demandant le nom du fichier (nomdefichier.xls)
• On copie 2 de mes feuilles classeur du fichier actuel
• On les colle dans un nouveau fichier au nom du fichier indiqué au dessus.

Auriez vous une syntaxe pour effectuer cela. Creer la boite de dialogue et récupérer le nom c'est facile.
Ce que je n'arrive pas c'est à creer simplement un nouveau fichier lui attribuer le nom défini dans la fenetre et qu'il s'enregistre tout seul (par exemple sur le bureau)

Merci pour tout aide.

 

[tototiti2008]

Re : Creer, ouvrir et copier des feuilles dans un classeur

Bonjour youki,

en espérant que ces 2 lignes pourront t'aider :

Sheets(Array("Feuil2", "Feuil3")).Copy
ActiveWorkbook.SaveAs Filename:="C:\Desktop\Classeur2.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False

 

[youki]

Re : Creer, ouvrir et copier des feuilles dans un classeur

Désolé je ne comprend pas, cela n'enregistre pas ds un nouveau classeur. J'ai bien sûr renommé les deux feuilles.

Sheets(Array("construction_devis", "devis_imprimable")).Copy
'C'est pour copier: ça on est d'accord

ActiveWorkbook.SaveAs Filename:="C:\Classeur2.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False

'Tu enregistre (normalement) dans c:/classeur2.xls (on commence sans changer le nom)

Mais deux choses:
Pour commencer cela ne creer pas de nouveau fichier classeur2.xls.

 

[youki]

Re : Creer, ouvrir et copier des feuilles dans un classeur

re bonjour, je bloque toujours? up?

 

[tototiti2008]

Re : Creer, ouvrir et copier des feuilles dans un classeur

Bonjour youki,

Pourtant, chez moi :

Sheets(Array("Feuil2", "Feuil3")).Copy

Crée un nouveau classeur avec une copie des Feuilles 2 et 3...

 

[youki]

Re : Creer, ouvrir et copier des feuilles dans un classeur

Hum, effectivement. Mais cela ne fonctionne pas de façons regulière. faut que je revérifie mon system.

Merci tototiti2008

Encore une question, je copie donc deux feuilles dans un nouveau fichier, sur une des feuilles se trouve un bouton command_button j'aimerais qu'il n'apparaisse pas sur la feuille copier est il possible de le supprimer ?

 

[youki]

Re : Creer, ouvrir et copier des feuilles dans un classeur

Pour le copier coller pourquoi il ne garde pas la meme mise en page (alignement, gras...)?

 

[tototiti2008]

Re : Creer, ouvrir et copier des feuilles dans un classeur

Comment fais-tu ton Copier-coller ?