Modifier une textbox depuis visual basic

Résolu
Bonjour à tous!

Je cherche à modifier le texte dune textbox qui est présente dans un document word. J'utilise pour cette modification visual basic 6.0 mais je n'arrive pas à faire référence à cette textbox dans la programmation de visual.
Est ce que quelqu'un pourrais m'aider silvouplait c'est assez urgent.

Merci d'avance!
Configuration: Windows XP
Internet Explorer 7.0

6 réponses

  1. Salut ^^

    l'astuce consiste en fait a ajouter des signets à ton document aux endroits qui t'interessent.
    Tu charge ton word :
    Set MonWd = CreateObject("Word.Application")
    MonWd.Visible = True
    MonWd.Documents.Open App.Path & "\test.doc"
    Si ton textbox sous vb s'appelle Text1
    MonWd.ActiveDocument.Bookmarks("signet").Select
    MonWd.Selection.InsertAfter Text1.Text

    Cependant, je vient de comprendre que ce n'est pas ca qui t'interesse ^^
    Regarde peut etre ca :
    https://codes-sources.commentcamarche.net/
    Mais sinon, pour selectionner un textbox c tres simple tu fais un maForm.text1.text
    Par exemple pour connaitre la longueur de ta textbox tu fera : Len(MaForm.TextBox2.Text)

    clair ou pas ? ^^

    1
    1. Merci je sais déja comment ouvrir word, c'était peut être mal expliqué mais mon problème c'est pour écrire dans une textbox d'un document existant.

      Merci quand même
      0
      1. lol oui ^^ en fait le message est parti avant que j'ai finit ;)
        0
        1. Merci mais je peut abuser de ta patience encore un peu?

          Quand tu écris "\test.doc", en fait il faut que j'écrive par exemple:
          "C:\Documents and Settings\DURAND\Mes documents\doc2"
          si mon document doc2 se trouve au bout de ce chemin

          ou bien est ce que le programme va chercher le document dans le même dossier que l'application si j'écris : "\doc2"?

          Merci d'avance!!
          0
          1. Je crois que l'application va chercher dans son repertoire mais tu peux déclarer une variable pthname et l'utiliser, comme bon te semble ^^
            0
            1. Cool merci je vais essayer tous de suite!!
              0
          2. Merci pour ton prog, ce qui me manquait c'était une base pour bosser, j'en ai fait une autre version :

            Set MonWd = CreateObject("Word.Application")
            MonWd.Visible = True
            MonWd.Documents.Open App.Path & "\doc2.doc"

            MonWd.ActiveDocument.Text1.text = "salut"
            MonWd.Close
            MonWd.visible = False

            Encore merci ^^
            0