Lien hypertexte sur une image

Lien hypertexte sur une image - VB/VBA/VBS - Programmation

Marsh Posté le 08-12-2011 à 20:19:16    

Bonsoir,
j'ai crée le code suivant dans Word VBA :

Code :
  1. Dim Image As InlineShape   
  2.     ' sélectionne image   
  3.     Dim i As Integer
  4.     Dim n As Integer       
  5.     n = ActiveDocument.InlineShapes.Count   
  6.     For i = 1 To n     
  7.     ActiveDocument.InlineShapes(i).Select 
  8.     ' traitement   
  9.     Next i     
  10.     End Sub


Je voudrai, lorsque je sélectionne une image, vérifier si son lien hypertexte n'est pas égal à telle valeur, et si c'est le cas, faire une copie de l'image (selection.copy).
Pourriez-vous m'aider à trouver le code? Merci d'avance. Arsène.

Reply

Marsh Posté le 08-12-2011 à 20:19:16   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed