Renvoi d'un chaîne d'adresse XValues etc...

Renvoi d'un chaîne d'adresse XValues etc... - VB/VBA/VBS - Programmation

Marsh Posté le 15-11-2005 à 19:27:29    

Salut à tous !
 
Avant tout merci à tous les participants, grâce à vous j'ai appris des tas de choses sur VBA Excel sans jamais avoir à me manifester ! Bon mais maintenant je vois pas comment régler mon problème.
 
 
Quand on définit les données d'un graphe, ça fait un truc du genre:
 
ActiveChart.SeriesCollection(1).Values = "=(Feuil1!R2C6:R3C6)"
 
Mais moi je ne veux pas définir l'adresse des données sources : je veux la mettre dans une variable...
 
Adresse = ActiveChart.SeriesCollection(1).Values
 
...pour pouvoir la modifier comme toute chaîne de caractères, du style :
 
Adresse = Replace(Adresse, "Feuil1", "Feuil2" )
 
J'aurai dans Adresse : "=(Feuil2!R2C6:R3C6)"
 
Bon mais "Replace" ne marche pas : Erreur 13, incompatibilité de type. Parce que dans ma variable il ne met pas l'adresse mais les valeurs ! Est-il possible de renvoyer l'adresse ou pas ?
 
Merci pour votre aide !
 
Charleau

Reply

Marsh Posté le 15-11-2005 à 19:27:29   

Reply

Marsh Posté le 15-11-2005 à 23:37:29    

Citation :

Adresse = Replace(Adresse, "Feuil1", "Feuil2" )  
 
J'aurai dans Adresse : "=(Feuil2!R2C6:R3C6)"


 
Heu... pourquoi les guillemets dans ton code ? ce sont des variables qu'il faut insérer
 


---------------
http://www.ypikay.com
Reply

Marsh Posté le 16-11-2005 à 01:18:01    

bonjour,
Si j'ai bien compris...
 
Dim Adresse$
ActiveChart.SeriesCollection(1).Values = "=(Feuil1!R2C6:R3C6)"
Adresse = ActiveChart.SeriesCollection(1).Formula
Adresse = Replace(Adresse, "Feuil1", "Feuil2" )
ActiveChart.SeriesCollection(1).Formula = Adresse
 
A+

Reply

Marsh Posté le 16-11-2005 à 14:00:11    

Super ! Ca a l'air de marcher à merveille ! Je ne connaissais pas cette propriété, merci !
 
Bon ça c'est pour "Values". Il existe le même genre de chose pour "Name" et "XValues" ?
 
PS : c'est quoi le $ dans"Dim Adresse$" ?
@ + !

Reply

Marsh Posté le 16-11-2005 à 20:59:30    

bonsoir,
C'est l'équivalent de Dim Adresse As String
Je ne comprend pas bien ta question sur Name et XValues.
Je me doutes un peu, je n'ai pas fait d'essai, je bricole assez peu les graphiques.  
Tu ne risques rien à faire des essais en "retournant" les propriétés dans des variables.  
Si ça marche bingo : tu auras appris quelque chose, sinon tu redemandes en reformulant mieux ta question avec un exemple...
 
Après vérification dans l'aide de VBA il semble que c'est bien celà. Pour XValues par prudence je ferais un Dim non typé quelquefois que ça te retourne un Array...
A+


Message édité par galopin01 le 16-11-2005 à 21:06:21

---------------
roger
Reply

Marsh Posté le 07-12-2005 à 12:17:52    

Ce que je veux dire c'est que ActiveChart.SeriesCollection(1).Formula  
renvoie l'adresse des données sources pour les VALEURS.
Existe-t-il une autre propriété qui renvoie l'adresse des données sources pour les VALEURS ABSCISSES (XValues) et pour le NOM du graphique (Name) ?
Si vous savez c'est très bien (perso j'ai pas trouvé) sinon c'est pas très grave j'ai pu m'arranger autrement.
@ + !

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed