Bonsoir le Forum,
Grâce à votre aide, j'avance dans mon projet qui doit me permettre d'alimenter une base de données à partir de sources de formats différents.
Mon nouveau problème est que certaines données que je reçois sont au format Word. J'ai trouvé des bouts de codes à ce sujet (merci aux Michel en passant ), mais je bloque à un endroit car contrairement aux exemples que j'ai trouvé, mon fichier Word sera ouvert, les noms de fichiers n'étant pas 'réguliers'.
Voici les lignes que j'ai récupérées :
Dim Wrd As Object
Set Wrd = CreateObject('word.Application')
Wrd.documents.Open ('C:\\1.rtf') ' je ne peux pas utiliser ceci !
Wrd.Selection.WholeStory
Wrd.Selection.Copy
A la place de la ligne avec le nom de fichier, j'ai bien essayé ceci :
Wrd.documents(1).Activate
ou
Wrd.activedocument.Select
Mais cela ne fonctionne pas...
Merci de me dire si vous savez...
A plus
Grâce à votre aide, j'avance dans mon projet qui doit me permettre d'alimenter une base de données à partir de sources de formats différents.
Mon nouveau problème est que certaines données que je reçois sont au format Word. J'ai trouvé des bouts de codes à ce sujet (merci aux Michel en passant ), mais je bloque à un endroit car contrairement aux exemples que j'ai trouvé, mon fichier Word sera ouvert, les noms de fichiers n'étant pas 'réguliers'.
Voici les lignes que j'ai récupérées :
Dim Wrd As Object
Set Wrd = CreateObject('word.Application')
Wrd.documents.Open ('C:\\1.rtf') ' je ne peux pas utiliser ceci !
Wrd.Selection.WholeStory
Wrd.Selection.Copy
A la place de la ligne avec le nom de fichier, j'ai bien essayé ceci :
Wrd.documents(1).Activate
ou
Wrd.activedocument.Select
Mais cela ne fonctionne pas...
Merci de me dire si vous savez...
A plus