Contenu récent par Zohnya

Voici la solution : For i = Feuille.ChartObjects.Count To 1 Step -1 Feuille.ChartObjects(i).Activate If ActiveChart.ChartTitle.Text = Feuille.Name & " Utilisation par semaine" Then With Feuille.ChartObjects(i) .CopyPicture End With '...

Bonjour le forum. Comme si bien dit dans le titre, je cherche a copier un graphe depuis Excel dans Word en pilotage word. Voici mon code et ça fait quelque temps que je bloque dessus en cherchant sur internet avec acharnement mais pas moyen de trouver comment faire : Il arrive a retrouver...

Oh non >< j'ai honte. J'ai bloqué sur une faute de frappe. Merci beaucoup. Promis, je fait une statue a ton effigie dans ma chambre et je me prosterne devant tout les matins.

Re... J'ai fait un fichier avec des valeurs bidons (et beaucoup moins nombreuses) pour tester. Si quelqu'un pourrait m'aider ?

Donc, j'ai remplacé la boucle foreach par une boucle for pour voir si ça changeait quelque chose et, absolument pas. Si je comprends bien, cette erreur se déclanche parce que il n'y a pas d'éléments dans mon "pivotItems" ?

Bonjour, j'utilise un TCD pour récupérer des infos concernant des états de machines. J'aimerais qu'on puisse filtrer le TCD selon l'utilisateur ou les utilisateurs. Voici mon code, mais ça ne fonctionne pas. Auriez-vous une idée sur la façon de procéder ? Dim ind As String Dim objetFiltre As...

AAAAH. Donc on peut pas prendre le milieu d'un tableau pour faire un TCD ? T'es obligé d'avoir les entêtes avec ? oooooh. *alleluia* Donc techniquement, si je copie colle les entêtes et les données qui m'intéressent dans une autre feuille et que je fais le TCD a partir de ça, ça devrait...

Bon. Pour tester, j'ai essayé de le faire à la main. Et bien, ça fonctionne pas non plus. Je ne comprend pas.

Nouvelle modification, nouvelle erreur. Pour paraphraser Leeloo dans le 5eme élément : "Please Help !" ActiveWorkbook.Sheets(prefixe & MachinesPlages(i, 1)).Range(Cells(DebutPlage, 1), Cells(FinPlage, larg)).Name = "PlageFiltree" 'Créer le TCD correspondant à la machine...

Bonjour, J'ai modifié la création du TCD de cette façon. ça ne marche toujours pas mais au moins l'erreur a changé ActiveWorkbook.Sheets(prefixe & MachinesPlages(i, 1)).Range(Cells(DebutPlage, 1), Cells(FinPlage, larg)).Name = "PlageFiltree"...

Ce sont des variables globales. Elles sont définies dans une autre fonction. debutPlage et finPlage représentent respectivement le numéro de ligne ou commence et fini la plage que l'on désire traiter. (ça, ça fonctionne. j'ai déjà controlé)

Bonjour, je réalise actuellement une macro dans le cadre de mon travail. J'ai une feuille qui contient les données relatives a une machine (l'utilisateur, les temps d'utilisations, etc.). Il est possible d'entrer une plage de date afin de filtrer les informations. Mon but est de récupérer...