Posez votre question Signaler

[Catégorie modifiée VB6 -> VBA] plage d'un graphique à faire varier [Résolu]

Messages postés
37
Date d'inscription
mardi 12 avril 2011
Statut
Membre
Dernière intervention
18 janvier 2016
 - - Dernière réponse : NHenry
Messages postés
14567
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
18 octobre 2019
 - 19 mai 2011 à 19:10
Visual Basic 6 Posez votre question Signaler
Bonjour à tous,

j'ai plusieurs plages de données sur ma feuille excel pour tracer différents graph.

Le problème c'est que j'aimerai faire varier ma plage de cellule dans une boucle tel que :

for ...
ActiveChart.SetSourceData Source:=Sheets("param.alloy.ni").range(cells(i,j),cells(k,l)), _
PlotBy:=xlColumns ...
next ...

le problème c'est que la plage range(cells(i,j),cells(k,l)) n'est pas acceptée et je ne vois d'autres manières pour faire varier les colonnes et lignes.

Dans ces conditions, quelle est la commande à utiliser?

Je vous remercie pour vos réponses,

jbbaudouin
Afficher la suite 

3 réponses

Meilleure réponse
Signaler Commenter la réponse de NHenry
Messages postés
14567
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
18 octobre 2019
 136
3
Merci
Bonjour, 

Public Function GetCarsColonnes(ByVal pIndexColonne As Long) As String
    Dim lStr as string
    lStr=Chr$(Asc("A")-1+(pIndexColonne Mod 26))
    If pIndexColonne>26 Then
        lStr=Chr$(Asc("A")-1+(pIndexColonne \ 26)) & lStr
    End If
    GetCarsColonnes=lStr
End Function


Je pense que ça devrait passer (code tapé directement dans la zone de saisie, donc quelques erreurs possible).

Mon site

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 195 internautes nous ont dit merci ce mois-ci

Commenter la réponse de NHenry
Signaler Commenter la réponse de NHenry
Messages postés
14567
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
18 octobre 2019
 136
0
Merci
Bonjour,

Si tes colonnes sont toujours < à AA :
Range(chr$(&h40+Col1) & Row1 & ":" & chr$(&h40+Col2) & Row2)

Ensuite, je te laisse adapter.

Mon site
Commenter la réponse de NHenry
Signaler Commenter la réponse de jbbaudouin
Messages postés
37
Date d'inscription
mardi 12 avril 2011
Statut
Membre
Dernière intervention
18 janvier 2016
0
Merci
ça pourrait marcher, mais le problème c'est que mes colonnes dépasse la colonne AA.
Quelqu'un à une autre proposition?
en tout cas merci pour ta réponse NHenry.

jbbaudoouin
Commenter la réponse de jbbaudouin
Répondre Posez votre question