Bonjour,

Un petit souci avec la définition des zones de façon dynamique ....

J'ai besoin d'actualiser un tableau dynamique croisé car le nombre de ligne des données a changé.
Le nombre de colonnes restant fixe.
J'ai trouvé la commande VBA mais toujours avec une zone de données fixes.

Dans l'exemple ci-dessous, la zone définie est A1-J68.
Je peux déterminer la zone de données, elle va de A1 à J"NbrMaxDeLignes".

Comment remplacer la zone fixe "Feuille1!$A$1:$J$68" par la zone A1 jusqu'à J"NbrMaxDeLigne ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
    Sheets("TDC").Select
 
    Range("B3").Select
    ActiveSheet.PivotTables("Tableau croisé dynamique1").ChangePivotCache _
        ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:="Feuille1!$A$1:$J$68" _
        , Version:=6)
Merci
TV