Discussion :

[nicroq]

Bonjour a tous et merci pour votre aide,

dans le fichier excel joint un userform s'ouvre des l ouverture du fichier excel et lorsque je choisis une option dans la combobox une nouvelle feuille se crée portant le nom de cette option.
Ma problematique est la suivante :
-que la feuille se créer dans un autre workbook nommé "PERSO"
-lorsque je ne mets rien dans la combobox je ne veux pas qu'une feuille se crée
-lorsqu une feuille aura le meme nom je voudrais qu'un message d alerte me dise que la feuille existe deja et en crée une avec le meme nom suivi de "BIS".

exemple.xls
merci pour votre aide

Cordialement

[clementmarcotte]

Bonjour a tous et merci pour votre aide,

-que la feuille se créer dans un autre workbook nommé "PERSO"

Cordialement

Ça c'est de la folie. Perso c'est le nom consacré du "Classeur de macros personnelles" depuis au moins Office 97, si ce n'est pas avant.

Pour créer une feuille:

sheets.add dans l'aide de vba

Pour le reste:

http://club.developpez.com/regles/#LIV-N

http://www.developpez.net/forums/d84...s-discussions/

[Menhir]

-que la feuille se créer dans un autre workbook nommé "PERSO"

Comme Clementmarcotte, je te conseille fortement de changer le nom de ton fichier.
En supposant qu'il s'appelle MonPerso, tu peux y créer une nouvelle feuille avec :

Code :

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

Workbooks("MonPerso").Worksheets.Add

Un conseil : mets devant un Set pour assigner le résultat à une variable de type Worksheet, ce qui te permettra d'en garder la référence et d'y accéder plus facilement pour modifier le contenu ou le nom.

Code :

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

-lorsque je ne mets rien dans la combobox je ne veux pas qu'une feuille se crée

Un simple If pour vérifier le contenu de ton combobox devrait suffire.

Code :

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

-lorsqu une feuille aura le meme nom je voudrais qu'un message d alerte me dise que la feuille existe deja et en crée une avec le meme nom suivi de "BIS".

Pour vérifier si le nom existe, fait une boucle For Each sur la collection Worksheets de ton Workbook destination.
Ca te permettra de tester les noms de chaque onglets et de vérifier s'il n'y en a pas un qui correspond.

Pour l'alerte, utilise une MsgBox.