Configure "ScatterLineMarkers" dans Chartspace en VBA et se prend la tête...

RomainDumoulin

XLDnaute Nouveau
salut tout le monde !
me revoila qques jours apres un dernier post avec mon interface graphique permettant d'afficher des mesures.
cette fois-ci, l'histoire, c'est de ne PAS faire apparaitre les points de mesures qui sont égales à zéros (et la ligne entre les points...)
Jetez un coup d'oeil au fichier joint, c'Est assez moche quand la courbe part de zero...

si je remplace les zero par des cellules vides, le grahpique se decale sur l'Axe des abcisses.. :(

J'ai tenté
VB:
 If Plage(i) = 0 Then
        .SeriesCollection.Item(x).Points.Item(i - 1).Border.Color = "white"
         .SeriesCollection.Item(x).Points.Item(i - 1).Interior.Color = "white"
          End If
mais bon on voit toujours la ligne et des markers blancs...vraiment moche...

J'Essaye de creer un graphique de type ScatterLineMarkers mais je seche sur le parametrage...


voici le code actuel :
VB:
For j = 0 To ListBoxLocataire.ListCount - 1 'boucle sur les éléments de la listbox
    If ListBoxLocataire.Selected(j) = True Then
    If Cht.SeriesCollection.Count > 0 Then Cht.SeriesCollection.Add
        
        For i = 1 To 26
        Plage(i) = visibles(j + 1, i) 'recuperation Ordonnees pour chaque série
        Next i
   
        With Cht
        .SetData C.chDimCategories, C.chDataLiteral, Tableau
        .SeriesCollection(x).SetData C.chDimValues, C.chDataLiteral, Plage
         
         For i = 1 To 26
          If Plage(i) = 0 Then
        .SeriesCollection.Item(x).Points.Item(i - 1).Border.Color = "white"
         .SeriesCollection.Item(x).Points.Item(i - 1).Interior.Color = "white"
          End If
       Next i
        End With
        x = x + 1
        Erase Plage
 End If
Next j
End Sub

si quelqu un a une idée, une suggestion, notamment pour le parametrage du type scatterlineMarkers : Je suis preneur !
Merci d'avance et à plus !
 

Pièces jointes

  • databaseRom.zip
    48.8 KB · Affichages: 40
  • databaseRom.zip
    48.8 KB · Affichages: 43
  • databaseRom.zip
    48.8 KB · Affichages: 42
Dernière édition:

Staple1600

XLDnaute Barbatruc
Re : Configure "ScatterLineMarkers" dans Chartspace en VBA et se prend la tête...

Bonjour


Juste de passage pour une petite demande

Le rouge cela fait mal au yeux

Prends le temps de lire ma signature, stp.

Merci au cas ou après sa lecture tu éditerais ton message précédent.
 

Discussions similaires

Réponses
7
Affichages
391
Réponses
0
Affichages
175

Statistiques des forums

Discussions
312 429
Messages
2 088 350
Membres
103 822
dernier inscrit
kader55