MACRO WORD
Sub Signature() ' ' Signature Macro ' Macro enregistrée le 03/01/2015 par PC USER ' Selection.EndKey Unit:=wdStory Selection.ParagraphFormat.Alignment = wdAlignParagraphRight Selection.InlineShapes.AddPicture FileName:= _ "C:\MedyCS\WordMacros\images\signature_300.jpg", LinkToFile:=False, _ SaveWithDocument:=True End Sub
Où :
- Place le curseur à la fin du document:
- Selection.EndKey Unit:=wdStory
- Aligne à droite :
- Selection.ParagraphFormat.Alignment = wdAlignParagraphRight
- Incruste l’image de la signature :
- Selection.InlineShapes.AddPicture FileName:= “C:\MedyCS\WordMacros\images\signature_300.jpg”, LinkToFile:=False, SaveWithDocument:=True
- Où :
- C:\MedyCS\WordMacros\images\signature_300.jpg est le chemin de l’image scannée de la signature
—-
Macro créée automatiquement avec l’Enregistreur de MACRO