Discussion :

[Zimae]

Bonjour,

Je suis débutante en macro, et j'aimerai crée une macro pour un fichier. Je dois faire un tableau pour chaque mois de l'année (au début du mois) et j'aimerai avoir une macro qui le fait pour moi.
C'est un tableau simple (je suis obligée de passer par un tableau parce que je dois mettre mon fichier Excel dans un Web App, qui gère visiblement mieux les tableaux), avec une mise en forme et qui est vide à la base (à part les entêtes).
Mon problème est qu'à la création d'un nouveau tableau, Excel renomme le tableau tout seul, et donc ma macro n'est plus bonne pour le second tableau (dans le second onglet).

Voilà le code que j'ai jusqu'à maintenant:

Sub tableau()
'
' tableau Macro
'

'
Range("A1").Select
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$1:$R$700"), , xlYes).Name = _
"Tableau1"
ActiveCell.Range("Tableau1[#All]").Select
ActiveSheet.ListObjects("Tableau1").TableStyle = "TableStyleMedium23"
Range("Tableau1[[#Headers],[Colonne1]] ").Select
End Sub

Est-ce que ma questione st claire et Est-ce que quelqu'un aurait une piste pour moi?

Merci et bonne journée

[parmi]

Bonjour,

Voici un bout de code qui créera un tableau dans les 3 premières feuilles du classeur.
Il s'agira de modifier au besoin.
Faire un test sur un classeur vierge pour voir comment il fonctionne.

Tu te retrouveras avec un Tableau1 sur la feuille 1, Tableau2 sur la feuille2,...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub CreerTableau()
    Dim I As Long
 
    For I = 1 To 3
        tableau (I)
    Next
End Sub
 
Sub tableau(Idx As Long)
    Dim Nom As String
 
    Sheets(Idx).Activate
    Range("A1").Select
 
    Nom = "Tableau" & Idx
    ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$1:$R$700"), , xlYes).Name = Nom
    ActiveCell.Range(Nom & "[#All]").Select
    ActiveSheet.ListObjects(Nom).TableStyle = "TableStyleMedium23"
    Range(Nom & "[[#Headers],[Colonne1]] ").Select
End Sub

[Menhir]

Si j'ai bien compris, tu crées un tableau par onglet mais tu voudrais que chaque tableau ait un nom différent de celui des autres onglets. C'est bien ça ?

Dans ce cas, le plus simple me semble de te mettre un tableau dans un onglet "modèle", de copier cet onglet, de lui mettre un nouveau nom et de renommer le tableau qu'il contient.

Quel est ta règle pour le nom des onglets et des tableaux ?