chris31

Bonjour a tous,

J'esssaye d'ouvrir un fichier .doc avec une USF en cliquant sur Ok, je n'ai pas d'erreur mais le fichier ne s'ouvre pas voila mon code :

Private Sub Ok3_Click()
Observations.Hide
' ouverture du fichier 'paragraphe1.doc'
Dim t As String
Dim t2 As String
t = ActiveDocument.Path
MsgBox t
t2 = t + '\\paragraphe1.doc'
MsgBox t2
Open t2 For Input As #1
End Sub

Est ce que je fais une betise ??

Merci a tous.