Création nouveaux docs à partir d'une liste

Bonjour,

Il y a peu vous me donniez un coup de mains pour une macro.

Voila cette une macro qui créer des feuilles en fonction d'une liste, et qui copie dans chacune d'elle le texte de la feuille G3.

Option Explicit

Sub CreationFeuilles()
Dim J As Long

  Application.ScreenUpdating = False

  With Sheets("Nomenclature")
    For J = 3 To .Range("E" & Rows.Count).End(xlUp).Row
      If FeuilleExiste(.Range("E" & J).Value) = False Then
        Sheets.Add(after:=Sheets(Sheets.Count)).Name = .Range("E" & J).Value
        Sheets("G3").Cells.Copy Range("A1")
        Range("A1") = .Range("E" & J)
      End If
    Next J
  End With
End Sub

Function FeuilleExiste(Nom As String) As Boolean
  On Error Resume Next
  FeuilleExiste = Sheets(Nom).Name <> ""
  On Error GoTo 0
End Function

Je cherche à créer à la place des feuilles de nouveaux documents contenant la feuille "avec le nom de la ville" et la feuille nommé nomenclature. Je souhaite avoir aussi comme dans la macro au dessus dans la cellule A1 le nom de la ville.

Tout aide sera la bien venu.

Merci d'avance pour vos conseil

Bonjour

Tu aurais pu continuer sur l'autre post

https://forum.excel-pratique.com/excel/creation-d-anglais-en-fonction-d-une-colonne-dynamique-t35084.html

Je trouve toujours ta demande incompréhensible et je t'ai demandé

Banzai64 a écrit :

Alors la tu prépares un fichier avec ce que tu as au départ et le résultat attendu

Si quelqu'un comprend je suivrais ce post avec intérêt

Je mets le meme document que sur le dernier document.

Il n'est pas très propre mais l'idée y est.

_Actuellement j'ai une macro qui me permet :

-de créer des feuilles en fonction d'une colonne "Villes", une feuille par ville

-de la nommé du nom de la ville

-de copier se que contient une feuille nommé "G3" et de le mettre dans chacune des nouvelles feuilles créer

-de remplacer la cellule A1 des feuilles créer par le nom de la ville (utile pour les calcluls à faire par la suite)

Le nombre de villes pouvant etre important (document très lourds) j'aimerai créer des documents excel independant au lieu de feuille.

_J'aimerai donc:

-Créer un nombre de document en fonction de la colonne ville, un document par ville

-La nommé du nom de la ville

-copier la feuille "nomenclature" dedans

-copier la feuille "G3"

-Dans la feuille "G3", A1 doit etre égale au nom de la ville

Je crois que c'est tout

Et la se n'est plus du tout de ma compétence. Je sais créer une page mais je melange mal tres mal le tout.

Si se n'est toujours pas claire, je me ferai un plaisir de vous expliquez de nouveau.

50bdd.zip (58.06 Ko)

Bonjour

D'après ce que je comprends tu veux créer des fichiers contenant la page "Nomenclature" et la page "G3" renommée

Un problème se pose : Les liaisons

Dans ta page G3 tu as des formules en liaison avec la page "Nomenclature" mais aussi avec la page "BDD", que faut t-il faire de ces liaisons ?

A te lire

En effet nous n'avons qu'a garder la page BDD aussi.

L'important c'est que toutes les feuilles ne soit pas dans le meme fichier

Bonjour

A tester

Attention remplacement sans avertissement du fichier s'il existe

Si tu ne le veux pas alors mets en remarque cette ligne

Application.DisplayAlerts = False

Oh! Je pensais la macro bien plus compliqué.

Je suis bleffé je te remercie.

Tu es vraiment précieux!

Bonjour,

Je cherche à présent a ajouter à cette macro, un code pour faire la meme chose mais avec un fichier PpT.

Meme colonne, mais créer les fichier ptt en prenant pour base non plus les onglets mais un fichier Ppt deja présent se nommant base.ppt.

Je voudrais donc

Lyon.ppt

Paris.ppt

Avec dans chaque fichier le contenu du fichier base.

Je ne trouve pas le code pour créer un fichier Ppt

J'imagine qu'il faut reprendre le code existant.

Rechercher des sujets similaires à "creation nouveaux docs partir liste"