copie 4 onglets via vba

sousou

XLDnaute Barbatruc

• 5 Mai 2010

• #2

Re : copie 4 onglets via vba

Bonjour Vincegr
Si je comprends bien,
Ta procédure doit faire une copie de tes onglest sans les formules.
Tu utilise dans ce cas la méthose colage spécial , des valeurs, puis des formats
Tua uras ainsi un nouveau calsseur sans lien ni formule.

 

Vote positif 0 Vote négatif

VINCEGR

XLDnaute Occasionnel

• 5 Mai 2010

• #3

Re : copie 4 onglets via vba

BONJOUR SOUSOU,

je souhaite une macro pour en un seul clic copie dans nouveau fichier ce qui serait plus simple pour une utilisation à plusieurs.

@+
VinceGR

 

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 5 Mai 2010

• #4

Re : copie 4 onglets via vba

RE

Bien sur un seul click
Copy et collage spécial de chaque feuille sur un nouveau calsseur.
Mais ou en es-tu?
envoi un exemple si possible pour voir

 

Vote positif 0 Vote négatif

VINCEGR

XLDnaute Occasionnel

• 5 Mai 2010

• #5

Re : copie 4 onglets via vba

re
oui je suis d'accord mais je souhaite automatiser une fonction pour rendre plus accessible classeur model.
et mon idée était de créer une macro qui copierai les onglets souhaités dans un nouveau classeur sans passer par collage spécial (si oubli modification des données).
VinceGR

 

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 5 Mai 2010

• #6

Re : copie 4 onglets via vba

Re
j'avoue ne pas bien te suivre.

Si tu n'utilises pas le collage spécial tu conserves les formules et liens, et c'est ce que tu ne veux pas

 

Vote positif 0 Vote négatif

VINCEGR

XLDnaute Occasionnel

• 5 Mai 2010

• #7

Re : copie 4 onglets via vba

justement en créant une macro qui copie les feuilles sans les formules j'obtient le résultat escomptés.🙂
mais voila je ne sais pas créer cette macro😕

 

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 5 Mai 2010

• #8

Re : copie 4 onglets via vba

re
Sans exemple difficile de t'expliquer!

 

Vote positif 0 Vote négatif

VINCEGR

XLDnaute Occasionnel

• 6 Mai 2010

• #9

Re : copie 4 onglets via vba

Bonjour le forum,🙂

j'ai trouvé comment effectué une copie des onglets via macro :

Public Sub copieonglet()
Sheets(Array("Rapports", "Donnees")).Copy
ActiveWorkbook.SaveAs "C:\Documents and Settings\Mes documents\Copie.xls"

End Sub

mais je souhaiterais qu'il me demande le nom du fichier pour nom.

que dois-je rajouter à ma macro comme indication😕
merci d'avance
VinceGR

 

Vote positif 0 Vote négatif

VINCEGR

XLDnaute Occasionnel

• 26 Mai 2010

• #10

Re : copie 4 onglets via vba

bonjour le forum,
comment rajouter dans un code vba la demande du fichier à créer par rapport au code ci-dessus ?
merci d'avance
VinceGR

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 26 Mai 2010

• #11

Re : copie 4 onglets via vba

Public Sub copieonglet()
dim NomFichier as string
NomFichier = InputBox("Nom de la copie de sauvegarde", "ATTENTE APPLICATION", "Sauvegarde du " & Replace(Date, "/", "_")) & ".xls"
Sheets(Array("Rapports", "Donnees")).Copy
ActiveWorkbook.SaveAs "C:\Documents and Settings\Mes documents\" & NomFichier

End Sub

 

Vote positif 0 Vote négatif

VINCEGR

XLDnaute Occasionnel

• 26 Mai 2010

• #12

Re : copie 4 onglets via vba

bonjour nono,
merci,
merci,
et encore merci
c'est top😀
@+
VinceGR

 

Vote positif 0 Vote négatif