VBA - Erreur 1004 sur .name...

[redqueen]

Bonjour!

J'ai un souci...
J'ai eu à convertir et à faire évoluer une appli acces97 vers 2002. Pas de souci pour moi. En revanche, l'appli alimente un fichier excel et je n'y connais rien en excel. Ca plante....je suis trop limitée par le temps pour approfondir la question AU SECOURS!

Voilà, si ça vous parle...ça fonctionnait sur l'ancienne version (excel 7 je crois)...je ne sais pas comment traduire pour corriger

ActiveWorkbook.Sheets(NouvelOnglet).PivotTableWizard SourceType:=xlDatabase, SourceData:= _
'Fac29Export!C1:C22', TableDestination:='R1C1:R7C1', TableName:= _
'Tableau croisé dynamique1'
With ActiveWorkbook.Sheets(NouvelOnglet).PivotTables('Tableau croisé dynamique1').PivotFields('DR')
End With
With ActiveWorkbook.Sheets(NouvelOnglet).PivotTables('Tableau croisé dynamique1').PivotFields('Grpe')
.Name = 'Groupe'
End With

-> erreur 1004: impossible de lire la propriété pivotfields de la classe pivotable

 

[pat1545.]

Salut,

difficile de travailler sur ça ...
tu sais pas zipper et annexer le fichier pour que tout le monde le voie ?

Patrick

 

[redqueen]

le voici...je n'osais pas trop (ce n'est pas un fichier perso...). Merci d'y jetter un oeil! PS: je me suis rendue compte que l'erreur n'étais pas systématique. j'ignore pourquoi et je commence à m'arracher les cheeux! [file]