Discussion :

[Philippe Tulliez]

Bonjour,
Afin de rendre invisible lors de l'impression d'un document, les contrôles de contenu non utilisés, je cherche à détecter si une photo a été téléchargée ou pas.
Soit dans l'image ci-dessous le contrôle entouré en rouge.



Pour les autres contrôles, j'ai trouvé la solution mais je cherche en vain pour le contrôle de contenu d'image

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub HiddenControl()
  ' Masque les contrôles formulaire non utilisés
  Dim Ctrl As ContentControl
  For Each Ctrl In ThisDocument.ContentControls
    With Ctrl
     Select Case .Type
       Case 0 To 1, 3, 6 ' Texte enrichi, brut, liste déroulante, sélection date
         .Range.Font.Hidden = .Range = .PlaceholderText
       Case 2 ' d'image
         ' .Range.Font.Hidden = False
     End Select
    End With
  Next
End Sub