Discussion :

[Arnaud2019]

Bonjour,

J'aimerais qu'en cliquant sur le bouton "CA_ajouter_menc", la macro suivante ajoute
un retour à la ligne juste après le dernier contrôle de contenu ayant pour tag
"CA_delai_date" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Private Sub CA_ajouter_menc_Click()
    With ActiveDocument
        Dim Nmenc As Integer
        Nmenc = .SelectContentControlsByTag("CA_delai_date").Count
        .SelectContentControlsByTag("CA_delai_date")(Nmenc).Range.Select
        Selection.MoveRight Unit:=wdCharacter, Count:=2, Extend:=wdMove
        Selection.Range = vbNewLine
...

mais Word refuse et m'affiche :

Erreur d'exécution '5844':
L'un des arguments est incorrect.

A ce moment, la dernière ligne du bout de code présenté ci-dessus est en
surbrillance (jaune).

Est-ce que quelqu'un a une idée du problème?

L'instruction problématique fonctionne dans d'autres macros...

En vous remerciant de prêter attention à ma demande,

Arnaud

[Arnaud2019]

En fermant la fenêtre d'erreur, stoppant les macros et cliquant sur le bouton à nouveau, le code fonctionne.

[clementmarcotte]

Bonjour,

VBNewline, n'est probablement pas reconnu pour insérer un paragraphe dans un document. la vraie constante c'est WdParagraph

[clementmarcotte]

Bonjour,

VBNewline, n'est probablement pas reconnu pour insérer un paragraphe dans un document. la vraie constante c'est WdParagraph

Liste des constantes

[Arnaud2019]

Bonjour,

Merci clementmarcotte.

Je n'ai pas essayé tout de suite car je n'étais pas au travail la semaine dernière.

wdParagraph est accepté.

Par contre, cela n'explique pas pourquoi vbNewLine était accepté ailleurs dans mon code...
Ni pourquoi ça fonctionnait en cliquant une deuxième fois sur le bouton.

Bon week-end