Discussion :

[bernard38]

Bjr,
Pquoi je ne vois pas mon doc avec ce code ?
rien ne s'affiche
Cdt

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Set DocWord = GetObject("U:\Doc2.doc")
DocWord.Activate
MsgBox DocWord.Range.Text
DocWord.Close False
Set DocWord = Nothing