Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Référence Non Valide

Référence Non Valide

1 réponse
Avatar
Ghyslain
Bonjour voici le codage que Isabelle ma faite essayer hier .... je croyais
que cela fonctionnait masi bon il me fait une référence non valide quand
j'essaie de creer mon TCD

ActiveWorkbook.PivotCaches.Add(SourceType:=xlConsolidation, SourceData:= _
Array(Array("" & ActiveSheet.Range("D8:E38").address & "", "Élément1"),
Array( _
"" & ActiveSheet.Range("D96:E126").address & "",
"Élément2"))).CreatePivotTable _
TableDestination:= _
"'[T-M Rapport Heures 2005(simon).xls]Semaine Oct 10-15'!R3C16", TableName:=
_
"Tableau croisé dynamique5", DefaultVersion:=xlPivotTableVersion10
ActiveSheet.PivotTables("Tableau croisé
dynamique5").DataPivotField.PivotItems( _
"Nombre de Valeur").Position = 1
ActiveWorkbook.ShowPivotTableFieldList = True

quelqu'un serait pk il me dit que j'ai une référence non valide :(

Merci d'avance de votre attention
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Ghyslain
Bonjour,
C'est beau ne chercher pas pour rien j'ai trouver comment faire :)
j'ai nommé mes cellule et marqer le nom defini de mes cellule au lieu de
activesheet.range("......).address
merci




"Ghyslain" a écrit dans le message de news:

Bonjour voici le codage que Isabelle ma faite essayer hier .... je croyais
que cela fonctionnait masi bon il me fait une référence non valide quand
j'essaie de creer mon TCD

ActiveWorkbook.PivotCaches.Add(SourceType:=xlConsolidation, SourceData:= _
Array(Array("" & ActiveSheet.Range("D8:E38").address & "", "Élément1"),
Array( _
"" & ActiveSheet.Range("D96:E126").address & "",
"Élément2"))).CreatePivotTable _
TableDestination:= _
"'[T-M Rapport Heures 2005(simon).xls]Semaine Oct 10-15'!R3C16",
TableName:= _
"Tableau croisé dynamique5", DefaultVersion:=xlPivotTableVersion10
ActiveSheet.PivotTables("Tableau croisé
dynamique5").DataPivotField.PivotItems( _
"Nombre de Valeur").Position = 1
ActiveWorkbook.ShowPivotTableFieldList = True

quelqu'un serait pk il me dit que j'ai une référence non valide :(

Merci d'avance de votre attention