Discussion :

[uriel2k]

Bonjour,

Je souhaite réaliser une macro qui permet de générer un graphique à partir de donnée dont la longueur peut varier d'un fichier à un autre.

J'ai définit une variable "ligne_vide" qui identifié le nombre de données présent dans le fichier (c'est à dire le nombre de lignes). Je n'arrive pas à intégrer la valeur de cette variable dans la définition de mon graphique

J'ai écris:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Charts.Add
    ActiveChart.ChartType = xlXYScatter
    ActiveChart.SetSourceData Source:=Sheets("Feuil3").Range("A10: B & lignevide "), PlotBy:=xlColumns

Un message d'erreur apparait : "erreur d'exécution 1004" !!

Pourtant lorsque j'écris:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(2, 9).Value = "B" & lignevide

, excel me renvoie bien "une concaténation de B et de la valeur de la variable ligne_vide: par exemple B1400.

Dès lors, quelle est la syntaxe afin de définir la plage de valeur " du début à la fin" dans le code générant le graphique.

Merci d'avance,

[Daranc]

pourquoi par VBA ?
dans
insertion
nom
definir
taper un nom de série
dans le champ du bas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=decaler( cliquer_l-entete_de_la serie;1;0;nbval(cliquer la colonne d-étiquette);1)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=decaler(feuil1!C1;1;0;nbval(feuil1!B1);1)

ajouter toute les serie (y compris les valeurs en X)
enregistrer le graphique sous un pseudonyme
1.xls ou F.xls (c'est pour la facilité de la suite)
dans le graphiques
serie 1
entrer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
valeur en X =1.xls!nom_valeur_en_X_precedemment_definie
valeur en Y ={1} 
remplacer le {1} par 1.xls!nom_serie_1

au besoin insertion
nom
coller
bon maintenat ion peut redonner un nom Chrétien à notre classeur :
enregistrer sous "Mon_classeur_tout_plein_de_graphiques_esthetique_qui_marche_tout_seul.xls"
(là on comprends que le 1.xls est plus facile à manier)


decaler (cellule de départ ; ligne decaler de ;colonne decaler de ; nombre de ligne;nombre de colonne)

[uriel2k]

Merci pour cette approche,

Pourquoi en VBA? Car j'ai beaucoup de fichier à traiter, Ces fichiers proviennent d'un import (.csv), j'ai donc rédigé une macro permettant à partir d'un simple clic sur un bouton, d'importer et de traiter mes résultats.

Comme je l'indiquais dans mon précédent "post", le nombre de données peut varier d'un fichier importé à un autre.

Je reformule ma question:

Par quoi dois-je remplacer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"A10: B & lignevide "

dans

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Charts.Add
    ActiveChart.ChartType = xlXYScatter
    ActiveChart.SetSourceData Source:=Sheets("Feuil3").Range("A10: B & lignevide "), PlotBy:=xlColumns

afin de faire appelle à ma variable ("lignevide") définissant la dernière ligne de ma seconde colonne?

En d'autre terme, quelle est la syntaxe a utiliser? Est-ce faisable?

[Daranc]

bon je suis parti en courant du boulot la réponse n'est pas passée

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
lignevide =range("a65535").end(xlup).row+1
 
  ActiveChart.SetSourceData Source:=Sheets("Feuil3").Range("A10:B" & lignevide ), PlotBy:=xlColumns

Daranc

[uriel2k]

Merci pour ces réponses, la dernière syntaxe fonctionne à merveille !!

Le topics peut être fermé.