Macro pour copier l'onglet...

[Christian0258]

Bonjour à tout le forum,


Je souhaiterais votre aide afin d'écrire une macro pour copier un onglet col A à F en le nommant du contenu de la cellule H1;

voir fichier...


Merci pour votre aide, si précieuse.

Bien amicalement,
Christian

 

[jeanpierre]

Re : Macro pour copier l'onglet...

Bonjour Christian0258, le forum,

Ce fil, par exemple, issu des 5 dernières discussions similaires en bas du présent fil :
https://www.excel-downloads.com/threads/copier-et-renommer-longlet-actif.58146/

Reste à changer l'adresse de ta propre cellule.

Bon WE.

Jean-Pierre

 

[Christian0258]

Re : Macro pour copier l'onglet...

Re, le forum, Jean-Pierre,

Merci pour le lien, Jean-Pierre, mais je souhaite copier, uniquement de la Col A à F et dans le même classeur.

à + et merci

Christian

 

[jeanpierre]

Re : Macro pour copier l'onglet...

Re,

Ok, alors tu as ce qu'il faut à disposition.

Outils/Macro/Nouvelle macro.

Tu fais ta manip. à la main, tu arrêtes l'enregistrement, soit par le bouton, soit par Outils/Macro/Arrêter l'enregistrement et tu as le code de recopie de l'onglet.

Te reste à intégrer le changement de nom (cf.lien proposé).

Au besoin, tu crées un bouton sur ta feuille et tu affectes ta macro à ce bouton (proposé, d'ailleurs, si tu utilises le bouton de la barre d'outils Formulaire)

Voila.

Jean-Pierre

 

[Christian0258]

Re : Macro pour copier l'onglet...

Re, le forum,

Merci, Jean-Pierre, pour tes conseils, mais je n'y arrive pas et n'arrive pas non plus à intégrer le nom de la cellule H1 de l'onglet source au nom du nouvel onglet....


à+

Christian

 

[Staple1600]

Re : Macro pour copier l'onglet...

Bonjour Christian, jeanpierre, le forum


Ca devrait fonctionner

Sub Copie()
Dim Source As Worksheet
Dim Desti As Worksheet
Set Source = Sheets("Récaps")
Set Desti = Sheets.Add
Source.Activate
Source.Range("A1:F" & [F65536].End(xlUp).Row).Copy Desti.Range("A1")
Desti.Name = Source.Range("H1").Text
End Sub

Edition: bonjour JCGL

 

[JCGL]

Re : Macro pour copier l'onglet...

Bonjour à tous,
Salut Christian 🙂,

Un essai d'archivage

A++ 🙂
A + à tous

Edition : Salut Staple ;-)

 

[Christian0258]

Re : Macro pour copier l'onglet...

Re, le forum,

Merci Staple1600, merci *JCGL c'est impec cher *ami hospitalier.

Merci à vous deux.

Amitiés,
Christian