With Me.TreeView1
.Nodes.Add Key:="A1", Text:="UN" , Image:="Image1"
.Nodes.Add Key:="A2", Text:="DEUX"
End With
End Sub
--------------------------------------------------------
J'ai l'erreur 35613 "Le contrÍ´le ImageList doit être initialisé avant
utilisation"
Je galére
Merci de l'aide
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichD
Le 11/01/21 Í 12:51, Brat'ac a écrit :
Bonjour, Je m'essaie aux Treeview, cela fonctionne sauf que je n'arrive pas Í mettre une image ----- Le code ------------------------------------- Public MesImages As New ImageList Private Sub UserForm_Initialize()   MesImages.ListImages.Clear   Img1 = "C:image.ico"   MesImages.ListImages.Add , "Image1", LoadPicture(Img1)       With Me.TreeView1         .Nodes.Add Key:="A1", Text:="UN" , Image:="Image1"         .Nodes.Add Key:="A2", Text:="DEUX"       End With End Sub -------------------------------------------------------- J'ai l'erreur 35613 "Le contrÍ´le ImageList doit être initialisé avant utilisation" Je galére Merci de l'aide
Bonjour,
Je m'essaie aux Treeview, cela fonctionne sauf que je n'arrive pas Í
mettre une image
----- Le code -------------------------------------
Public MesImages As New ImageList
Private Sub UserForm_Initialize()
  MesImages.ListImages.Clear
  Img1 = "C:image.ico"
  MesImages.ListImages.Add , "Image1", LoadPicture(Img1)
      With Me.TreeView1
        .Nodes.Add Key:="A1", Text:="UN" , Image:="Image1"
        .Nodes.Add Key:="A2", Text:="DEUX"
      End With
End Sub
--------------------------------------------------------
J'ai l'erreur 35613 "Le contrÍ´le ImageList doit être initialisé avant
utilisation"
Je galére
Merci de l'aide
Bonjour,
Regarde ici, un exemple sur ce site concernant ton message d'erreur.
Bonjour, Je m'essaie aux Treeview, cela fonctionne sauf que je n'arrive pas Í mettre une image ----- Le code ------------------------------------- Public MesImages As New ImageList Private Sub UserForm_Initialize()   MesImages.ListImages.Clear   Img1 = "C:image.ico"   MesImages.ListImages.Add , "Image1", LoadPicture(Img1)       With Me.TreeView1         .Nodes.Add Key:="A1", Text:="UN" , Image:="Image1"         .Nodes.Add Key:="A2", Text:="DEUX"       End With End Sub -------------------------------------------------------- J'ai l'erreur 35613 "Le contrÍ´le ImageList doit être initialisé avant utilisation" Je galére Merci de l'aide
Bonjour, Je m'essaie aux Treeview, cela fonctionne sauf que je n'arrive pas Í mettre une image ----- Le code ------------------------------------- Public MesImages As New ImageList Private Sub UserForm_Initialize()   MesImages.ListImages.Clear   Img1 = "C:image.ico"   MesImages.ListImages.Add , "Image1", LoadPicture(Img1)       With Me.TreeView1         .Nodes.Add Key:="A1", Text:="UN" , Image:="Image1"         .Nodes.Add Key:="A2", Text:="DEUX"       End With End Sub -------------------------------------------------------- J'ai l'erreur 35613 "Le contrÍ´le ImageList doit être initialisé avant utilisation" Je galére Merci de l'aide
Merci du retour, j'avais trouvé le site, mais je ne m'en sors pas pour autant. l'Í¢ge surement :-[
MichD a présenté l'énoncé suivant :
Le 11/01/21 Í 12:51, Brat'ac a écrit :
Bonjour,
Je m'essaie aux Treeview, cela fonctionne sauf que je n'arrive pas Í mettre
une image
----- Le code -------------------------------------
Public MesImages As New ImageList
Private Sub UserForm_Initialize()
  MesImages.ListImages.Clear
  Img1 = "C:image.ico"
  MesImages.ListImages.Add , "Image1", LoadPicture(Img1)
      With Me.TreeView1
        .Nodes.Add Key:="A1", Text:="UN" , Image:="Image1"
        .Nodes.Add Key:="A2", Text:="DEUX"
      End With
End Sub
--------------------------------------------------------
J'ai l'erreur 35613 "Le contrÍ´le ImageList doit être initialisé avant
utilisation"
Je galére
Merci de l'aide
Bonjour,
Regarde ici, un exemple sur ce site concernant ton message d'erreur.
Bonjour, Je m'essaie aux Treeview, cela fonctionne sauf que je n'arrive pas Í mettre une image ----- Le code ------------------------------------- Public MesImages As New ImageList Private Sub UserForm_Initialize()   MesImages.ListImages.Clear   Img1 = "C:image.ico"   MesImages.ListImages.Add , "Image1", LoadPicture(Img1)       With Me.TreeView1         .Nodes.Add Key:="A1", Text:="UN" , Image:="Image1"         .Nodes.Add Key:="A2", Text:="DEUX"       End With End Sub -------------------------------------------------------- J'ai l'erreur 35613 "Le contrÍ´le ImageList doit être initialisé avant utilisation" Je galére Merci de l'aide
