Discussion :

[had4789]

Bonjour à tous,

Voila je génère un TCD via une macro tout ce qu’il y a de plus classique.

Le titre actuel de ma première colonne est "Nombres de 2014". Je voudrais remplacer ce titre par la valeur M1 de ma feuille "SaveExport".

Est-ce quelqu’un a une idée ?

Merci par avance

[jijie]

ben si tu test ça :

Code :

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

1
2
3
4
Sub test()
 
Sheets("feuil1").Range("a1") = Sheets("SaveExport").Range("M1")
End Sub

Si dans M1 tu n'as pas le même nom qu'une autre colonne de titre de ton TCD alors pas de problème!?

ou alors je ne comprends pas la question

[Philippe Tulliez]

Bonjour,
N'ai je pas déjà répondu à la même question http://www.developpez.net/forums/d14...d/#post7907997 ?
As-tu fait un test ?

[had4789]

Bonjour,

Jijie c'est dans un TCD que je veux effectuer se changement de nom.

Philippe, oui tu as répondu une première fois mais mon dernier message estresté sans réponse.

Concernant le code que tu m'as donné il ne fonctionne pas, j'ai une erreur 404 sur la ligne

Code :

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

 Set pvt = Feuil3.PivotTables(1)

[Philippe Tulliez]

Bonjour,
Ce ne serait pas plutôt une erreur 1004 ?
Si c'est le cas, il est possible qu'il n'y ait pas de tableau croisé dynamique dans la feuille dont la propriété CodeName est Feuil3
Tu peux aussi utiliser cette syntaxe

Code :

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

 Set pvt = ThisWorkbook.Worksheets("Feuil3").PivotTables(1)

[had4789]

Bonjour;

Avec le set que tu m'as envoyer ça fonctionne mais ça ne répond pas à ma question.

Ce que ton code fait on peut le faire en ajoutant un .Name dans la macro qui crée mon TCD.

Avec ton code le nom de ma nouvelle colonne est "Somme de CA" ce qui ne correspond pas à la cellule M1 de la feuille save export.

Merci pour ton aide.