Discussion :

[nawakbling]

Bonjour

J'ai une macro qui met à jour un TCD : étend la plage de cellule source + rafraichit

J'ai une erreur 1004 à la dernière ligne :

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
Sub MAJTCDSynth()

Dim pvt As PivotTable
Dim nbcolonne, nbligne As Integer
    
    ActiveWorkbook.Sheets("TCD_Synthese").Select
    
    'Définit le premier TCD de la feuille active.
    Set pvt = ActiveSheet.PivotTables(1)
    
    'Définit la plage de données source
    nbcolonne = Worksheets("Synth").UsedRange.Columns.Count
    nbligne = Worksheets("Synth").UsedRange.Rows.Count

   pvt.SourceData = "Synth!L1C1:L" & nbligne & "C" & nbcolonne

Merci de votre aide

[ZebreLoup]

Tu as essayé en remplaçant les L par des R. Il me semble que quand on est en VBA, on utilise toujours la notation anglo-saxonne.

[Didier Gonard]

Bonjour,

ne serait-il pas plus simple d'utiliser une plage nommée dynamique ?

http://www.developpez.net/forums/d11...e-donnees-tcd/

Cordialement,

Ps : si le côté technique de la réponse = OK ou pas => pensez à cliquer sur les pouces et quand question résolue à la taguer résolue, et chaque action vous rapporte des points

Didier