Discussion :

[Nako_lito]

bonjour a tous,
je souhaiterai ouvrir par macro un nouveau classeur avec une seule feuille appelée "Récap" et le classeur avec le même nom.

je voulais utiliser Workbooks.Add avec un de ses parametre, mais je ne les comprend pas, et l'aide Excel ne sert a rien par ce que c'est pas clair du tout.

Par avance, merci .

[le_dilem]

Je ne sais pas si j'ai bien compris mais essaye ça

Code :

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

1
2
3
4
5
6
Sub Khadra()
Workbooks.Add
      Sheets("Feuil1").Name = "RECAP"
       ActiveWorkbook.SaveAs Filename:="D:\RECAP.XLSX"
 
    End Sub

[Nako_lito]

quand on fais workbook.add ca ouvre un nouveau classeur mais avec 3 feuilles, on peut effectivement renomer la feuille, mais il faut egalement penser a supprimer les 2 autre, n'existe t'il pas une facon de faire pour n'avoir qu'une seule feuille d'entrée ?

[mercatog]

Code :

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

Workbooks.Add (1)

[Nako_lito]

Parfait !
Merci beaucoup.

Petit chipotage de plus ^^, est il possible de renomer la feuille directement ?

[casavba]

Code :

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

ActiveWorkbook.ActiveSheet.Name = "TOTO"

[Nako_lito]

Oui ok, mais c'est en deux temps donc ?

premierement:

Code :

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

Workbooks.Add (1)

Deuxiemement

Code :

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

Activeworkbook.Activesheet.Name = "toto"

Il n'y a pas de moyen de faire ca en une seule etape ?

[mercatog]

Code :

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

Workbooks.Add(1).Sheets(1).Name = "TOTO"

ne demande surtout pas en un mot

[Didier Gonard]

Bonjour,

C’est même plus compliqué que cela :

Ta demande d’origine :

je souhaiterai ouvrir par macro un nouveau classeur avec une seule feuille appelée "Récap" et le classeur avec le même nom.

Donc, si on reformule, tu veux créer un classeur nommé Récap avec une feuille unique nommée Récap également.

Il faut penser qu’il y a une distinction entre un Classeur Excel et un fichier Excel.

Quand tu ouvres un fichier Excel, l’application crée un Classeur pour l’héberger.

Quand tu créés un nouveau Classeur via la méthode Add, tu créés un Classeur, mais tu n’as pas créé de fichier correspondant, ça ne se fera que par le biais d’une sauvegarde.

Pour bonne preuve :
Tu crées un classeur, tu mets une ou 2 données et tu le sauves sous le nom Toto, tu le fermes.
Tu crées un autre classeur, tu mets une ou 2 données différentes et tu le sauves sous le nom Toto (dans un autre répertoire), tu le fermes.
Maintenant tu peux ouvrir un des deux à loisir, mais Excel t’interdira d’ouvrir les deux simultanément alors qu’il n’y a aucun problème (technique) à avoir des fichiers .xls qui portent le même nom avec des contenus différents, Excel ne peut tolérer (dans la même instance) deux classeurs aux noms identiques.

Code :

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

1
2
3
4
5
6
Sub Crea()
With Workbooks.Add(xlWBATWorksheet)  'l'objet renvoyé est un Workbook (sans "s")
   .Worksheets(1).Name = ("Totooo")
   .SaveAs Filename:="L:\" & .Sheets(1).Name & ".xls"
End With
End Sub

Attention : la syntaxe

Code :

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

 Workbooks.Add(1)

est trompeuse, le (1) est un argument, qui étant une constante, spécifie le type de la feuille unique créée et non le nombre de feuille.. selon la syntaxe de la méthode employée :

Cette méthode crée un nouveau classeur qui devient le classeur actif. Elle renvoie un objet Workbook.

expression.Add(Template)
expression Obligatoire. Expression qui renvoie un objet Workbooks.

Template Argument de type Variant facultatif. Détermine la façon dont le nouveau classeur est créé. Si cet argument est une chaîne spécifiant le nom d'un fichier Microsoft Excel existant, le nouveau classeur est créé sur le modèle du fichier spécifié. Si cet argument est une constante, le nouveau classeur contient une seule feuille du type spécifié. Il peut s'agir de l'une des constantes XlWBATemplate suivantes : xlWBATChart, xlWBATExcel4IntlMacroSheet, xlWBATExcel4MacroSheet ou xlWBATWorksheet. Si vous n'avez pas spécifié cet argument, Microsoft Excel crée un nouveau classeur avec plusieurs feuilles blanches (le nombre est établi par la propriété SheetsInNewWorkbook).

c'est pourquoi, il vaut mieux employer le nom de l'argument...

cordialement,

Didier

cordialement,

Didier

[Nako_lito]

Merci bcp !