Macro excel Fermé

Question

Bonjour,

J'essaie de crée une macro sur excel et j'ai un petit soucis. En effet, âpres l'avoir enregistrer j'essaie de la faire fonctionner. Tout va bien au début jusqu'au moment ou il doit me faire un tableau croisée dynamique. J'obtiens un blocage au moment ou il ouvre une autre fenêtre pour me faire le tableau. Le blocage serait au niveau de cette ligne : 
" ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
        "envoi_manuel_OTE_20211118!R1C1:R92C24", Version:=xlPivotTableVersion15). _
        CreatePivotTable TableDestination:="Feuil1!R3C1", TableName:= _
        "Tableau croisé dynamique1", DefaultVersion:=xlPivotTableVersion15 "

Mais je ne comprends pas pourquoi ca ne marche pas.
Une petite aide ne serait pas de refus.

Cordialement,

Frenchie83 · Answer

Bonjour,

Faute de fichier, difficile de répondre à coup sûr, mais comme visiblement vous avez utilisé l'enregistreur de macro, à chaque création d'un TCD, le code force le nom du TCD avec l'index 1 Il faut donc, avant de créer le TCD, supprimer le TCD existant de la feuille 1.
Comme ceci à titre d'exemple (bien sûr, on peut se passer des "Select" si on connaît le contenu de la macro entière)
    Sheets("Feuil1").Select
    Cells.Select
    Selection.ClearContents
    ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
    "envoi_manuel_OTE_20211118!R1C1:R92C24", Version:=xlPivotTableVersion15). _
    CreatePivotTable TableDestination:="Feuil1!R3C1", TableName:= _
    "Tableau croisé dynamique1", DefaultVersion:=xlPivotTableVersion15

Cdlt

Macro excel

1 réponse

Discussions similaires