Probleme sur excel

1) créer une macro comme ça

sous Xl 2003 ou 2007 : Alt F11 ( accès au module visual basic)

2) menu : insertion /module ( le module s'appelle module1 : il est vide)

dans la page principale (la feuille blanche) tu fais un copier coller de la macro que j'ai écris)

3) click sur enregistrer

la macro va créer un feuille "ajout" et dans les cellules A2 à Axx tu auras une liste des onglets
bien sur dans cette liste figurera aussi toutes les autres feuilles dont la feuille "Ajout"

pour executer cette macro : 2 solutions A) à partir du module vba click dans la macro puis sur le triangle vert (barre d'outils)
B) il faut créer un bouton sur une feuille excel et lui affecter la macro.

Si cela ne te conviens pas explique mieux ton problème.

A+

bien recu ton message mais vba pour moi est un peu compliqué et je ne sais comment faire
merci si tu peux me depanner

voici mon question
on dit ma question mais je nechipotte...

sur excel j'ai plusieures feuilles de 0 a 40 intitulees table N°
et je voudrai incrementé automatiquement chaque N° dans une liste
un incrément automatique qui relié un objet feuille à un objet cellule ou un tableau dynamique
il n' y a pas d'autres solutions que de passer par VBA
les formules excel relie les objets cellules aux objets cellules....

pouvez vous me depanner sur le sujet

j'ai essayé
d'avance merci
Daniel
Thi is my pleasure
Roger

merci de m'avoir repondu
mais malheureusement ce n'est pas la reponse que j'attendai
bonne journee
daniel

je te propose ce code à placer dans un module

Sub creation_liste()
Dim C As Variant

For Each C In workshheets
If C.Name = "Ajout" Then
'la feuille existe : la liste est mise à jour
' on efface
Range("A2:A100").ClearContents
Else
'il faut créer la feuille 'Ajout'
End If

Next

Sheets.Add
ActiveSheet.Name = "Ajout"
i = 2

For Each C In Worksheets
Sheets("Ajout").Cells(i, 1).Value = C.Name
i = i + 1

Next

End Sub

tu veux l'écrire sur une nouvelle feuille?

Bonjour,

Pour moi, c'est pas clair...

S'il s'agit d'avoir une liste numérotée de 1 à 40, il suffit de taper Table no 1 dans une cellule et de tirer jusqu'à 40.

Je n'ai sans doute rien compris.

m@rina