Modifier infobulle sur nuage de points excel 2003

Résolu
ccm81 Messages postés 11033 Statut Membre -  
ccm81 Messages postés 11033 Statut Membre -
Bonjour

Comment peut on modifier l'infobulle lorsqu'on passe la souris sur un point d'un graphique de type nuage de points (excel 2003)

Merci

11 réponses

  2.
    JvDo Messages postés 1924 Date d'inscription   Statut Membre Dernière intervention   859
     
    une proposition: https://www.cjoint.com/c/DLuoNXbztJW

    il faut l'affiner car elle ne différencie pas un point d'une graduation d'axe.

    A+
    1
  3. JvDo Messages postés 1924 Date d'inscription   Statut Membre Dernière intervention   859
     
    d'abord il faut ajouter un rectangle dans chaque graphique puis remettre le masquage du rectangle si le mouseover n'est pas sur un point, et remettre l'affichage de ce "rectangle 1" avec le contenu de textbox1.text créé par ta macro.

    j'ai modifié le positionnement du rectangle pour que ce soit plus agréable quand tu promènes la souris.

    https://www.cjoint.com/c/DLupZWNFVjG

    cordialement
    1
  4. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Je me doute bien que ça doit être tordu, mais n'y a t'il pas un un moyen d'y arriver via macro(s) ?
    0

  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Raymond PENTIER Messages postés 58213 Date d'inscription   Statut Contributeur Dernière intervention   17 482
     
    Peut-être ! On fait tant de choses avec une macro ...
    0
  7. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Merci,

    J'ai réussi à récupérer le n° du point, c'est déjà quelque chose, mais pas à modifier l'infobulle attachée au point

    Cdlmnt
    0
    1. JvDo Messages postés 1924 Date d'inscription   Statut Membre Dernière intervention   859
       
      salut ccm81,

      t'as un fichier avec ce que tu veux?
      0
  9. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Merci,

    J'ai ajouté le test sur la valeur de ElementID (3 pour un point) et transformé AfficheInfo en fonction (ça fait plus propre), ça fonctionne bien (et c'est plus gratifiant que le double-clic) pour remplir le textbox, mais ça n'agit pas sur l'infobulle des points 

    Private Sub Graph_MouseMove(ByVal Button As Long, ByVal Shift As Long, _
                        ByVal x As Long, ByVal y As Long)
        Dim ElementID As Long
        Dim Arg1 As Long, Arg2 As Long
        On Error Resume Next
        ActiveChart.GetChartElement x, y, ElementID, Arg1, Arg2
        If ElementID <> 3 Or Arg2 = 0 Then
            ActiveSheet.TextBox1.Text = ""
        Else
            ActiveSheet.TextBox1.Text = AfficheInfos(Arg2)
        End If
    End Sub

    Cdlmnt
    0
    1. JvDo Messages postés 1924 Date d'inscription   Statut Membre Dernière intervention   859
       
      bin normal puisque j'ai viré l'infobulle pour rediriger vers le texbox!!

      si tu veux les 2, il faut remettre la partie infobulle dans le module de classe

      cdlt
      0
  10. ccm81 Messages postés 11033 Statut Membre 2 434
     
    OK, et quelle est la manip? (Je découvre les Modules de classe alors tu comprendras que je galère ferme)
    0
  11. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Jolie ruse pour contourner le problème, il ne reste qu'à travailler sur les coordonnées du rectangle pour qu'il ne disparaisse pas lorsqu'on s'approche des bords du graphique, ça, je pense m'en sortir tout seul
    Merci encore
    J'attends un peu pour mettre en résolu

    Bonne fin de journée à toi

    Cordialement
    0
  12. Raymond PENTIER Messages postés 58213 Date d'inscription   Statut Contributeur Dernière intervention   17 482
     
    C'est impossible.
    -3

Discussions similaires

plusieurs séries, nuage en points
giogio -
giogio -

7 réponses
nommer des points sur nuage de points
flo644 -
Xelloss -

14 réponses