Bonsoir,
je recherche une macro pour afficher de manière alternative "Intervention sur site" ou Intervention à distance" en titre d'une page word. Je sais que le site est dédié à Excel mais s'agissant de macro le VBA est le même
On a proposé le code suivant, mais j'aimerais que l'affichage se fasse à un endroit désigné d'une feuille Word, et pas dans une msgbox:
Merci
Public Var As Boolean
Sub bascule()
If Var = False Then
Var = True
MsgBox "Intervention sur site"
Else
Var = False
MsgBox "Intervention à distance"
End If
End Sub
Pour répondre à ta question, une solution possible: insérer un signet. Place le curseur à l'endroit où le texte doit apparaître, puis onglet "Insertion" > groupe "Liens" > "Signet" (nommer ce signet "Test", par exemple). Le code pourrait être le suivant:
VB:
Sub signet()
ThisDocument.Bookmarks("test").Range.Text = _
IIf(var = False, "Intervention sur site", "Intervention à distance")
End Sub