XL 2016 VBA / copier onglet selectionné dans nouveau classeur

K

Koko74

XLDnaute Nouveau

• 2 Février 2020

• #2

Bonjour,

Je ne suis pas sûr de comprendre ton problème mais si c'est le nom de la feuille qui pose pb pourquoi ne pas simplement faire ActiveSheets ?

Un fichier exemple pourrais aider à mieux comprendre ton pb !

Bonne soirée

 

Vote positif 0 Vote négatif

J

JANO

XLDnaute Occasionnel

• 2 Février 2020

• #3

Merci [U]Koko74[/U],
Dans le fichier ci-joint lorsque je clique sur le bouton envoyer, je copie la feuille dans un nouveau classeur, mais ce n'ait pas toujours le même non de feuille que j'envoie. Je ne sais pas si je suis plus claire. cordialement

 

Pièces jointes

• TEST.xlsm

  78.6 KB · Affichages: 6

Vote positif 0 Vote négatif

J

JANO

XLDnaute Occasionnel

• 2 Février 2020

• #4

Cela fonctionne avec : ActiveWindow.SelectedSheets.Copy
j'ai longtemps cherché , mais j'oubliai le ActiveWindow devant SelectedSheets.Copy.
merci beaucoup @Koko74, désolé du dérangement
Bonne soirée

 

Vote positif 0 Vote négatif

K

Koko74

XLDnaute Nouveau

• 2 Février 2020

• #5

Dans ce cas si je comprend bien il suffit de faire ceci :

Sub mail()

ActiveSheet.Copy

Dim Wbk As Workbook
Set Wbk = ActiveWorkbook
'Wbk.SendMail "mon email", " Terre : " & Range("C6").Value
Set Wbk = Nothing

End Sub


Marche qu'importe le nom de la feuille

PS : Ah ba tu as trouvé tout seul avant, parfois c'est quand c'est simple qu'on se prend le plus la tête

Bonne soirée

 

Vote positif 0 Vote négatif

Solution

J

JANO

XLDnaute Occasionnel

• 2 Février 2020

• #6

j'ai encore une question : vu que je copie la feuille dans un nouveau classeur et que je ne l'enregistre pas (je l'envoie via excel).
Est ce que c'est possible de le nommer autrement que par défaut : classeur1 ?
Je crois que non. merci

 

Vote positif 0 Vote négatif

K

Koko74

XLDnaute Nouveau

• 3 Février 2020

• #7

Hello,

Sauf erreur de ma part tu es obligé de l'enregistrer pour changer le nom, mais rien ne t'empêche de le supprimer après

Tout cela est faisable via ta macro bien sûr

J'essaye de te faire ça dans la journée

 

Vote positif 0 Vote négatif