Demande d'aide vb6 et word

icomicar Messages postés 81 Statut Membre -  
icomicar Messages postés 81 Statut Membre -
Bonjour,
Je voudrais un code pour ouvrir un fichier word dont le nom est saisi dans une zone texte
ce code ouvre le fichier nommé monfichier
Dim MyWord As Word.Application
Set MyWord = New Word.Application

With MyWord
.Documents.Open ("e:\nouveau\monfichier.doc")
.Visible = True
End With
Set MyWord = Nothing
je veux que l'utilisateur puisse saisir le nom du fichier qu'il veut ouvrir dans une zone texte
merci a vous
Configuration: Windows XP
Internet Explorer 7.0

1 réponse

  1. icomicar Messages postés 81 Statut Membre 2
     
    Salut
    J'ai fini par trouver !voici si jamais ca interesse quelqu'un
    Dim MyWord As Word.Application
    Set MyWord = New Word.Application
    With MyWord
    .Documents.Open ("e:\nouveau\" & Trim(Text1.Text))
    .Visible = True
    End With
    Set MyWord = Nothing
    0