none
Selectionner la valeur dans un contentcontrols en vba RRS feed

  • Question

  • Bonjour,

    J'ai une macro qui vient remplir plusieurs champs dans des documents ("word") et je me heurte à un problème avec les contrôle de contenu.

    En effet je n'arrive pas à indiqué quelle valeur je veux afficher dans une liste déroulante . Par exemple j'ai une liste déroulante (qui porte le nom de balise BmTypeMoulage) contenant les valeurs suivantes:
    Injection
    Compression
    Transfert

    Et voici la macro que j'ai tenté d'utiliser:

    Sub GetCCByTag()
    Dim docCCs As ContentControls
    Set docCCs = ActiveDocument.SelectContentControlsByTag("BmTypeMoulage")
    MsgBox docCCs.Item(1).Range.Text
    docCCs.Item(1).Range.Text = "Injection"
    End Sub


    J'arrive bien à lire la valeur afficher mais lorsque j'arrive sur la ligne  docCCs.Item(1).Range.Text = "Injection" j'obtiens l'erreur 6124 Impossible de modifier cette sélection car elle est protégée.

    Je précise que mon document n'est pas protégé.

    Une idée?

    D'avance merci.


    mardi 20 septembre 2016 09:29

Toutes les réponses

  • Bonjour,

    Vous avez dû cocher les cases qui empêche la modification et / ou la suppression du contenu...

    Allez dans Propriété et modifiez ces valeurs ou bien faîte le par code VBA

        [Expr].LockContentControl = False
        [Expr].LockContents = False



    Argy


    mardi 27 septembre 2016 08:24
    Modérateur