Bonjour,
j'aimerais simplement récupérer un commentaire dans un cellule excel et l'intégrer a un item d'une listbox (je suis avec vb express 2010)
Voici mon code (qui fonctionne très bien) pour la récupération des cellules et des commentaires :
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
 
        Dim itemligne, toolligne As String
        Me.Top = (Screen.PrimaryScreen.WorkingArea.Height() - Me.Height)
        Me.Left = (Screen.PrimaryScreen.WorkingArea.Width() - Me.Width)
        nomfichier = excelapp.Workbooks.Open("u:important.xls")
        excelapp.Sheets(1).activate()
        ligne = 2 'je ne veux pas de ce qu'il y a sur la première ligne
        ListBox1.Items.Clear()
        While (excelapp.ActiveSheet.cells(ligne, 1).value) <> ""
            itemligne = excelapp.ActiveSheet.cells(ligne, 2).value
            If itemligne = "" Then itemligne = "-----"
            itemligne = itemligne + "  " + excelapp.ActiveSheet.cells(ligne, 1).value
            ListBox1.Items.Add(itemligne)
---------------------------------------------------
            If excelapp.ActiveSheet.cells(ligne, 1).comment Is Nothing Then
                toolligne = "pas de commentaire"
            Else
                toolligne = excelapp.ActiveSheet.cells(ligne, 1).comment.text
            End If
------------------------------------------------
            ligne = ligne + 1
        End While
J'ai réussi à récupérer les commentaires que je mets a chaque lecture de cellule dans une variable toolligne mais comment intégrer ce texte dans un tooltips pour une listbox ?
Merci d'avance !