en vba - gestionnaire des noms avec la formule décaler- tcd

[foufie]

bonjour a tous

voici ce que j'aimerai faire en vba , je en sais pas si c'est possible


je souhaiterai nommer une Source de données dynamique pour mon tcd


c'est a dire je voudrais faire les manip suivant mais en code vba

aller dans le gestionnaire de noms

choisir le nom > tcd
choisir la page >base


référence écrire >=DECALER(Base!$A$1;;;NBVAL(Base!$A:$A);NBVAL(Base!$1:$1))

ce qui me donne une plage dynamique

ensuite aller dans modifier source du tableau dynamique
et écrire tcd pour que le tcd exploite la source de données dynamique



voici mon code

' Macro3 Macro
F09.Range("H7").Select
    Selection.Copy
' contenu de la case H7 ActiveCell.FormulaR1C1 = _
        '"=DECALER(BdDonnees!$A$1;;;NBVAL(BdDonnees!$A:$A);NBVAL(BdDonnees!$1:$1))"
ActiveWorkbook.Worksheets("Données").Names.Add Name:="tcd", RefersToR1C1:= _
        "=OFFSET(BdDonnees!R1C1,,,COUNTA(BdDonnees!C1),COUNTA(BdDonnees!R1))"
ActiveWorkbook.Worksheets("Données").Names("tcd").Comment = ""
    
End Sub

excel affiche une erreur sur mon code - par contre le nom apparaît bien dans le gestionnaire des noms mais n'es pas exploitable par le tcd > reference non valide

 

[gosselien]

Re : en vba - gestionnaire des noms avec la formule décaler- tcd

Bonjour,

les grands chefs ici (dont je ne suis pas) vont te demander un fichier exemple sans données sensibles , plus facile à travailler

P.