Intégrer du texte dans un textbox

Bonjour à tous,

Encore moi car j'ai encore une petite question : je voudrais, grâce à un code VBA, en cliquant sur un bouton intégrer l'ensemble du texte d'un fichier word spécifique dans un textbox créé dans un userform.

J'ai un doute sur la possibilité de réaliser cela

Merci de bien vouloir confirmer ou infirmer mes doutes

Bonjour,

Cela est possible mais semble assez complexe.

S'il s'agir de texte limités à un ou plusieurs paragraphes il est préférable de confectionner autant de fichier .Txt que de Textbox ou de Label à remplir.

Dans ce dernier cas une simple function irait lire le fichier texte et le renvoie dans le container voulu.

Private Function READAT(s$) 'Lit le fichier .txt qui décrit l'activité en cours
   Dim oFSO As Scripting.FileSystemObject
   Dim oFl As Scripting.File
   Dim oTxt As Scripting.TextStream
   Set oFSO = New Scripting.FileSystemObject
         On Error GoTo GESTERR
   Set oFl = oFSO.GetFile(s)
   Set oTxt = oFl.OpenAsTextStream(ForReading)
      READAT = oTxt.ReadAll
      oTxt.Close
   Exit Function
GESTERR:
READAT = "Oups !|Activité en préparation...|0"
End Function

Si tu dois vraiment travailler sur Wrd je te renvoie à une recherche Google :

vba excel extraire du texte word

A+

Bonjour Galopin,

Merci pour cette réponse rapide. Je vais l'étudier de plus près.
Toutefois c'était surtout par curiosité que j'ai posé cette question car il serait en effet plus simple d'appeler le fichier word, ce qui est facile à réaliser.
Mais je vais essayer d'utiliser ta proposition et voir ce que cela donne

Encore merci et bonne fin de journée.
Au plaisir

... L'utilisation de fichiers .txt est très simple à réaliser. Même si vous en avez un grand nombre. Ce qui se passe généralement quand on veut légender ou commenter diverses options.

Vous voulez commenter des voyages ou excursions de manière brève, ou des activités sportives ou de loisirs. il est très simple de faire une liste numérotée de chaque item et en fonction du choix de l'utilisteur de lui renoyer quelques indications selon son choix. Il est même possible, de composer très facilement des fichiers texte "à découper" :

Un titre,

Un commentaire,

Un prix

...

Le tout en une seule passe avec la fonction que j'ai jointe...

A+