Données source faisant référence à une cellule pour le chemin

nat54

XLDnaute Barbatruc

• 9 Février 2009

• #46

Re : Données source faisant référence à une cellule pour le chemin

pierrejean à dit:

Re

En fonction de ta version d'Excel il n'est pas impossible que le problème vienne du fait que tu utilises des chiffres plutot que des lettres (chez moi cela fonctionne aussi bien avec un chiffre q'un string)
Essaies de les mettre en parametre sous la forme "3980"
Par ailleurs teste la modification manuelle des series dans l'onglet modele (je rappelle que le fichier contenant la feuille Pole_3980 doit etre ouvert)

Cliquez pour agrandir...

mettre en paramètre càd ?

je testerais la modif manuelle

 

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 9 Février 2009

• #47

Re : Données source faisant référence à une cellule pour le chemin

j'ai testé qqch

dans mon fichier TdB_chiffre j'ai renommé
pole_4000 en pole_A
pole_3980 en pole_B
j'ai lancé la requête, il me met l'erreur 'formula...'
mais sur le nouvel onglet les séries ont bien été actualisées

j'avais fait le test avec un seul graphe
je vais voir en les mettant tous

et si ca marche, je verrais si les liens sont toujours ok
en renommant mes onglets avec pole_4000

 

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 9 Février 2009

• #48

Re : Données source faisant référence à une cellule pour le chemin

je continue les tests car ca ne marche quand y'a plusieurs graphes..

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 9 Février 2009

• #49

Re : Données source faisant référence à une cellule pour le chemin

Re

Voila un bon moment que je me bats avec tes fichiers mais je vais devoir declarer forfait
J'ai avancé un peu en modifiant ainsi

Code:

Sheets.Add.Name = "Graphs_" & pole 'ajoute un onglet qui est nommé graphes_pole + nomde la variable pole
Sheets("onglet_modèle").Cells.Copy Destination:=ActiveSheet.Range("A1") 'copier l'onglet-modèle graphs_pole_A
ActiveWindow.Zoom = 60
ActiveWindow.DisplayGridlines = False
For m = 1 To Sheets("Graphs_" & pole).Shapes.Count ' compter le nombre de formes-graphiques
Workbooks("TdB_graphes.xls").Activate 'aller sur le fichier TdB Graphes
 Sheets("Graphs_" & pole).Shapes(m).Select 'sélectionner les graphiques de l'onglet que l'on souhaite créer
 Set ch = ActiveChart 
 [COLOR=blue]If Not ch Is Nothing Then
[/COLOR]   For n = 1 To ch.SeriesCollection.Count 'compter le nombre de série
   Workbooks("TdB_chiffres.xls").Activate
   Sheets("pole_" & pole).Select   
   [COLOR=blue]If InStr(ch.SeriesCollection(n).Formula, "pole_4000") <> 0 Then
[/COLOR]    ch.SeriesCollection(n).Formula = Replace(ch.SeriesCollection(n).Formula, "pole_4000", "pole_" & pole) 'remplacer dans les formules de série des graphs pole_A par le pole en question
   [COLOR=blue]End If
[/COLOR]   Next n 'on boucle sur le nombre de série
[COLOR=blue] End If
[/COLOR] 
Next m 'on boucle sur le nombre de graphiques
Workbooks("TdB_graphes.xls").Activate 'on se replace sur le fichier TdB graphes
Application.ScreenUpdating = True
End Sub

mais je subis rapidement une erreur fatale avec signalement a Microsoft qui me dis de mettre a jour Office (je n'en ai pas les moyens !!)
Sincerement désolé

 

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 9 Février 2009

• #50

Re : Données source faisant référence à une cellule pour le chemin

Ca marche très bien jusqu'à 3/4 onglets

Je vois une alternative dans ce cas

Serait-ce possible de garder le fichier TdB_graphe comme disons
fichier "créer_graphiques_d'un_pole"

Je rentre en cellule A2 de l'onglet Lancer_creation_onglet
le pole souhaité (voire la liste des pôles dans un rêve absolu 😀)
ex : 4000

et ça me crée un nouveau fichier nommé TdB_graphes_pole_4000
avec juste un onglet avec tous les graphes

à mon avis dans ma solution actuelle
il y a trop de police, trop lourd et ca fait planter excel
là ça résoudrait mon pb (j'espère...)

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 9 Février 2009

• #51

Re : Données source faisant référence à une cellule pour le chemin

Re

C'est un peu la voie que j'explore mais j'ai encore bon nombre d'erreurs fatales
Je reprend demain

 

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 10 Février 2009

• #52

Re : Données source faisant référence à une cellule pour le chemin

en tout cas grand merci pour ton acharnement !

 

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 10 Février 2009

• #53

Re : Données source faisant référence à une cellule pour le chemin

Pierrejean,

attends avant de re-coder quoique ce soit CB60 m'a peut-être donné une solution sans vba

 

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 10 Février 2009

• #54

Re : Données source faisant référence à une cellule pour le chemin

Pierrejean,

Je tenais à te remercier pour tout le travail que tu as fait pour moi

CB60 a trouvé une solution plus "simple" à mettre en oeuvre (en partant de mon postulat de mon premier post de ce fil) càd en indiquant le fichier et l'onglet où excel doit rechercher l'info pour les données-sources des graphiques

exemples
mens_N_1=INDIRECT("[" &'Graphs'!$C$1&"]" & 'Graphs'!$C$2& "!$d$6:$d$13")
mens_M_1=INDIRECT("[" &'Graphs'!$C$1&"]" & 'Graphs'!$C$2& "!$o$49:$o$56")
mens_M=INDIRECT("[" &'Graphs'!$C$1&"]" & 'Graphs'!$C$2& "!$e$6:$e$13")
mens_abscisse=INDIRECT("[" &'Graphs'!$C$1&"]" & 'Graphs'!$C$2& "!$c$6:$c$13")


Question restante à CB60 :
> pourquoi je dois à chaque lancement faire édition / liaison / modifier source et réindiquer le chemin de mon fichier TdB_chiffres ?
je dois bien ouvrir les 2 fichiers en même temps ?

Des pistes :

** peut-être qu'en cellule C1 il faudrait indiquer tout le chemin de localisation du fichier et non pas juste son nom ?!

** ou alors - comme discuté en MP - mon pb serait peut-être solutionné en nommant (insertion/nom/définir) également les références données source des moyennes ?
mais comme dit je n'arrive pas (je vais réessayer) à prendre les données d'un autre onglet

** noms de série dans le fichier tdb_graphes au lieu de noms de série dans tdb_chiffres ?

Merci d'avance !

 

Dernière édition: 10 Février 2009

Vote positif 0 Vote négatif

CB60

XLDnaute Barbatruc

• 10 Février 2009

• #55

Re : Données source faisant référence à une cellule pour le chemin

Bonjour à Tous
Nath, je ne sais pas trop quoi te dire car je n'ai pas rencontré le soucis que tu m'indique, j'ai crée X fichiers graphs en fonction du premier et grace à cette fonction indirect, les graphs évolus correctement.
Besoin de plus d'infos pour pouvoir t'aider, ( je ne modifie aucune liaison ou quoi que se soit)

 

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 10 Février 2009

• #56

Re : Données source faisant référence à une cellule pour le chemin

là je ne crée pas de nouveau fichier c'est juste sur les 2 premiers (chiffres, graphes)

et là tu ne prends les infos que d'un seul onglet à la fois
or moi pour l'instant je prends mes moyennes d'un autre onglet via des liaisons sans nom (insertion/nom/définir)
"mon pb serait peut-être solutionné en nommant (insertion/nom/définir) également les références données source des moyennes ?
mais comme dit je n'arrive pas (je vais réessayer) à prendre les données d'un autre onglet"

 

Dernière édition: 10 Février 2009

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 10 Février 2009

• #57

Re : Données source faisant référence à une cellule pour le chemin

si jamais on ne trouve pas la source du pb
peut-être s'inspirer du code vba (merci l'enregistreur)

Code:

Sub Macro1()
'
' Macro1 Macro
    ActiveWorkbook.ChangeLink Name:="TdB_chiffres.xls", NewName:= _
        [B]"TdB_chiffres.xls",[/B] Type:=xlExcelLinks
End Sub

comment juste donner le nouveau nom sans forcément connaître l'actuel ?

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 10 Février 2009

• #58

Re : Données source faisant référence à une cellule pour le chemin

Re

Salut Bruno

@ nat

voir MP (si ok je mettrai le Vba ici)

 

Vote positif 0 Vote négatif

CB60

XLDnaute Barbatruc

• 10 Février 2009

• #59

Re : Données source faisant référence à une cellule pour le chemin

Bonjour Pierre Jean
C'est vrai que se serais mieux de comprendre avec les fichiers je les joints à ce post.
Nath pour tes liens sur le classeur graph il faut avoir le bon nom de fichier pour la source ( en A3 )

 

Pièces jointes

• TdB_chiffres1.zip

  23 KB · Affichages: 25

Vote positif 0 Vote négatif

nat54

XLDnaute Barbatruc

• 10 Février 2009

• #60

Re : Données source faisant référence à une cellule pour le chemin

@ pierrejean : tu m'as envoyé un MP ?? ou alors je ne comprends pas..

@ bruno : j'ai un peu remodelé le fichier donc maintenant c'est en C1 de l'onglet graph et j'ai bien dans cette cellule TdB_chiffres

Je ré-explique mon souci
Là je lance les 2 fichiers réels à savoir TdB_chiffres et TdB_graphes
TdB_graphes me met 'référence externe non valide'
Pour résoudre le pb : édition / liaison / modifier fichier source / je pointe vers TdB_chiffres

S'il n'y avait que moi à utiliser le fichier, no souci mais il va être utilisé par les Directeurs donc ça ne fait pas très pro de leur dire
allez dans édition... blablabla..

 

Vote positif 0 Vote négatif