IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

ToolTipText sur ColumnHeader - ListView


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé Avatar de ippo_master
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    Septembre 2007
    Messages
    71
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes

    Informations forums :
    Inscription : Septembre 2007
    Messages : 71
    Par défaut ToolTipText sur ColumnHeader - ListView
    Bonjour,

    Je cherche la possibilité de détailler à l'utilisateur le contenu abrégé des en-têtes de colonnes d'un ListView, via du ToopTipText.
    Cela est-il possible ?

    Merci d'avance de vos partages d'expérience

  2. #2
    Membre confirmé Avatar de ippo_master
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    Septembre 2007
    Messages
    71
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes

    Informations forums :
    Inscription : Septembre 2007
    Messages : 71
    Par défaut
    J'illustre ma demande avec un rendu visuel sur Outlook (au survol de l'en-tête de colonne, apparition d'un commentaire/tooltip)

    Nom : ToolTip_ColumnHeader.jpg
Affichages : 366
Taille : 28,5 Ko

  3. #3
    Membre confirmé Avatar de ippo_master
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    Septembre 2007
    Messages
    71
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes

    Informations forums :
    Inscription : Septembre 2007
    Messages : 71
    Par défaut
    L'absence de réponse me laisse penser que ce n'est pas jouable.
    Quelqu'un aurait-il une suggestion de contournement pour obtenir une fonctionnalité équivalente ?

  4. #4
    Membre extrêmement actif
    Homme Profil pro
    Inscrit en
    Septembre 2013
    Messages
    1 369
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Septembre 2013
    Messages : 1 369
    Par défaut
    Bonjour,

    Voila ce que l'on aurait avec un ListBox:

    Nom : Sans titre.png
Affichages : 340
Taille : 8,5 Ko


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    Dim NbCol
    Private Sub UserForm_Initialize()
      NbCol = [tableau1].Columns.Count
      Me.ListBox1.ColumnCount = NbCol
      tblBD = [tableau1].Value
      For i = 1 To UBound(tblBD): tblBD(i, 4) = Format(tblBD(i, 4), "0000.00"): Next i
      Me.ListBox1.List = tblBD
      EnteteListBox
    End Sub
     
    Sub EnteteListBox()
      x = Me.ListBox1.Left + 8
      Y = Me.ListBox1.Top - 12
      For i = 1 To NbCol
        Set lab = Me.Controls.Add("Forms.Label.1")
        lab.Caption = [tableau1].Offset(-1).Cells(1, i)
        Set cel = [tableau1].Offset(-1).Cells(1, i)
        If Not cel.Comment Is Nothing Then
          lab.ControlTipText = cel.Comment.Text
         End If
        lab.Top = Y
        lab.Left = x
        x = x + [tableau1].Columns(i).Width * 1.1
        temp = temp & [tableau1].Columns(i).Width * 1.1 & ";"
      Next i
      temp = Left(temp, Len(temp) - 1)
      Me.ListBox1.ColumnWidths = temp
    End Sub

    Boisgontier
    Fichiers attachés Fichiers attachés

  5. #5
    Membre confirmé Avatar de ippo_master
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    Septembre 2007
    Messages
    71
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes

    Informations forums :
    Inscription : Septembre 2007
    Messages : 71
    Par défaut
    Merci merci pour cette lueur d'espoir.
    Donc l'idée est de générer des en têtes de liste via label auquel on associe la notion de controltiptext ?

Discussions similaires

  1. Utilisation d'un tooltiptext sur une cellule ..
    Par mitje dans le forum AWT/Swing
    Réponses: 7
    Dernier message: 01/07/2006, 02h44
  2. ToolTipText sur plusieurs lignes
    Par Nicool dans le forum AWT/Swing
    Réponses: 5
    Dernier message: 20/06/2006, 18h23
  3. Réponses: 5
    Dernier message: 08/06/2006, 16h11
  4. Mettre une info bulle Tooltiptext sur un rectangle?
    Par danje dans le forum Graphisme
    Réponses: 7
    Dernier message: 21/11/2005, 09h31
  5. [JTree] ToolTipText sur chaque node
    Par Stessy dans le forum Composants
    Réponses: 6
    Dernier message: 19/04/2005, 16h01

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo