Dupliquer et nommer une feuille

Résolu/Fermé
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 - 31 mars 2015 à 14:50
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 - 1 avril 2015 à 09:34
Bonjour,
Dans un classeur j'ai une feuille qui comporte en colonne B des données.
Je souhaiterais ,quand j'ajoute un nom de donnée dans la colonne B,ma feuille nommée
"modele" soit dupliquée et nommée d'après le nouveau nom que j'ai mis dans la colonne B.
Si quelqu'un peu me donner un code VBA.
merci pour votre aide
Cordialement

6 réponses

jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424
31 mars 2015 à 17:35
Re Bonjour,

Personne n'a de solution a me proposer?
Cordialement
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
31 mars 2015 à 17:39
Bonjour,

quand j'ajoute un nom de donnée dans la colonne B, Une cellule de la colonne B ex: B2, toujours la meme????
0
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424
31 mars 2015 à 17:51
Bonjour f894009

Merci pour ta réponse.
Ce n'est jamais la même cellule cela commence a B1 et probablement
jusque B15
Crdlt
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
31 mars 2015 à 17:57
Re,

En dehors du nom pour l'onglet, il y aura aussi la colonne B avec la liste de nom dans tous les onglets !!!!!
0
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424
31 mars 2015 à 18:08
Non,la liste de noms colonne B reste dans la feuille données.seul l'onglet et la cellule A1
de la feuille "modèle"doit avoir le nouveau nom qui a été ajouté dans la liste.
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019
31 mars 2015 à 18:16
Re,
Ok, ajout nouvelle feuille par clic sur un bouton ou Fin ecriture cellule nouveau nom ????
0
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424 > f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024
31 mars 2015 à 18:21
tu fais au plus simple
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
31 mars 2015 à 18:24
Re,
Ok

A+
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
31 mars 2015 à 18:37
Re

Donc, au plus simple, entree d'une info dans une cellule B1 a B15

https://www.cjoint.com/c/ECFsXjxZxWf
0
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424
31 mars 2015 à 18:43
j'ai un bug ici
Sheets("Modèle").Copy After:=Sheets("Modèle")
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019
31 mars 2015 à 18:48
Re,

mettez le nom de votre feuille modele
0
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424 > f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024
31 mars 2015 à 18:55
maintenant bug ici
If Not Application.Intersect(Target, Range("B1:B15")) Is Nothing And Target.Count = 1 And Target <> "" Then
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
1 avril 2015 à 08:00
Bonjour,

Vous connaissez le VBA excel ?????
0
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424
1 avril 2015 à 09:34
bonjour
je n'y connais pas grand chose en vba ,mais j'ai trouvé l'erreur tout
simplement un problème d'accent sur le mot données.
merci encore
cordialement
0