IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Ecrire en continu dans un ContentControl de Word


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Étudiant
    Inscrit en
    Décembre 2007
    Messages
    113
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : Belgique

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Décembre 2007
    Messages : 113
    Par défaut Ecrire en continu dans un ContentControl de Word
    Bonjour à tous,


    J'ai un petit soucis, depuis peu, que vous aller probablement considérer comme débutant, mais j'ai cherché un peu partout et essayé un tas de choses mais malheureusement cela ne marche pas comme je voudrais...

    Voici mon problème :

    J'aimerais écrire dans un document word préexistant à un endroit où il existe des paragraphes avant et après.
    Pour me faciliter la vie j'y ai créé un ContentControl pour y écrire dedans (ainsi je sais où démarrer et je ne risque pas décraser les paragraphes déja existant à la fin). Existe-t-il une meilleure solution ou suis-je bien occupé?

    Si la solution est la bonne j'ai tout de même un problème c'est de pouvoir écrire en continue avec un titre en Style1, un sous-titre en Style2 et le texte en normal.

    Pour un exemple sous VBA et sans contentControl ça donnerait ceci:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    wrdApp.Selection.MoveDown Unit:=wdLine, Count:=19
    wrdApp.Selection.style = wrdDoc.Styles("Titre 2")
    wrdApp.Selection.TypeText text:="Produits"
    wrdApp.Selection.TypeParagraph
    wrdApp.Selection.style = wrdDoc.Styles("Titre 3")
    wrdApp.Selection.TypeText text:="Produit 1"
    wrdApp.Selection.TypeParagraph
    wrdApp.Selection.style = wrdDoc.Styles("Normal")
    wrdApp.Selection.TypeText text:="Text 1"
    wrdApp.Selection.TypeParagraph
    wrdApp.Selection.TypeText text:="Text 2"
    Et ainsi de suite...
    Pour le ContentControl ce que j'ai essayé en dernier c'est ceci :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    With tfDocx.BodyCC("startFormulas").Range
        .Style = tfDocx.Doc.Styles("Titre 2")
        .Text = "Produits BENOR"
    End With
    With tfDocx.BodyCC("startFormulas").Range.Characters.Last
        .InsertParagraphAfter()
        .Style = tfDocx.Doc.Styles("Titre 3")
        .Text = "essais"
    End With
    Malheureusement ça ne marche pas comme désiré. (tfDocx.BodyCC("startFormulas") = fait appel au contentcontrol dans le document word)

    Quelqu'un serait-il m'aiguiller? Voir me proposer des lignes de codes pour écrire l'exemple ci-dessus?

    Merci d'avance

  2. #2
    Membre confirmé
    Profil pro
    Étudiant
    Inscrit en
    Décembre 2007
    Messages
    113
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : Belgique

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Décembre 2007
    Messages : 113
    Par défaut
    Personne?

Discussions similaires

  1. ecrire du texte dans un fichier word
    Par sonia5 dans le forum ASP.NET
    Réponses: 2
    Dernier message: 16/02/2010, 01h09
  2. [VBA Excel] Ecrire en couleur dans un Word
    Par eagleleader dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 13/11/2007, 10h03
  3. [ACTXSERVER] Ecrire du texte dans une page word
    Par solinoid555 dans le forum MATLAB
    Réponses: 6
    Dernier message: 16/04/2007, 10h35
  4. [MFC]Ecrire du texte dans un rectangle
    Par zaz16 dans le forum MFC
    Réponses: 8
    Dernier message: 29/07/2003, 10h31
  5. comment ecrire du texte dans une window application
    Par gaut dans le forum Autres éditeurs
    Réponses: 2
    Dernier message: 16/07/2003, 10h23

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo