Discussion :

[MANOU06]

Bonsoir,

Je voudrais insérer une feuille "toto" dans un nouveau classeur,...mais en créant en même temps le dit nouveau classeur "tutu".

Avez vous quelque chose de simple pour faire cela ?

Merci

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub Test()
 
ThisWorkbook.Sheets("Toto").Copy
With ActiveWorkbook
   .SaveAs ThisWorkbook.Path & "\" & "Tutu.xls"
   .Close
End With
End Sub

PS: Écrire en majuscule dans un forum est mal vu

[MANOU06]

ok, je ne savais pas...

Non, ça ne marche pas, ça bog à la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ThisWorkbook.Sheets("TC").Copy

(ma feuille s'appelle "TC"

[mercatog]

Question récurrente: et quel est le message d'erreur?

[MANOU06]

le message est :

Erreur d'exécution 9
L'indice n'appartient pas à la sélection

...

[mercatog]

Dans le classeur où tu as écris ta macro, tu n'as pas de feuille qui s'appelle TC
(sans espace ni avant ni après TC)