listbox et word

Bonsoir,
Dans une listbox j'ai une liste de fichier .doc.
Quand je clique sur l'un de ces fichier je souhaiterai qu'il s'ouvre dans word.
Voici mon code:

Code:

---

1 2 3 4 5 6 7 8

Private Sub LstFichier_Click() Dim DocWord As Word.Document Dim chemin As String chemin = Me.LstFichier.ItemData Set DocWord = GetObject("chemin") DocWord.Activate   End Sub

---

Mais ce ne fonctionne pas....:cry:

si chemin est le nom de ta variable, pour utiliser sa "valeur" il ne faut pas le mettre entre " ;)

Merci pour la reponse mais mon erreur est sur itemdata

Citation:

---

Envoyé par hugoclo

Merci pour la reponse mais mon erreur est sur itemdata

---

heureux de le savoir !


remplace itemdata par text

ca marche merci