nom des feuilles à partir du bdd

[musica]

salut,
j'aimerai pouvoir créer le nom des feuilles de calcul à partir d'une base de donnée ( comme un publipostage sous word par exemple ).
comment donc, faire en sorte qu'excel mette des info d'une base de donnée là où je veux : cellule, nom de feuille de calcul...

merci par avance car cela m'éviterait quelques heures de frappe

@++
michel

 

[Rénato]

Bonjour Musica,

Voici une petite procédure qui devrait t'aider :

1 - Colle ces lignes de code dans ton éditeur
2 - Transfers dans un classeur sur un onglet ta BDD avec ce qui sera tes noms de feuilles.
3 - selectionne la BDD puis exécute la macro.

Sub FeuilViaLst()
Dim Mycell As Range, Mysheet As Worksheet, MyName$
For Each Mycell In Selection 'liste de noms
MyName = Mycell.Value
If MyName <> "" Then
On Error Resume Next
Set Mysheet = Sheets(MyName)
On Error GoTo 0
If Mysheet Is Nothing Then Sheets.Add.Name = MyName
End If
Next Mycell
End Sub

NB : je ne revendique pas la paternité de ce script, rendons à JOSS ce qui lui appartient.

Rénato