digitale handtekening

[jan excel]

Goede middag allen,

Onderstaande code die ook via dit forum is verkregen verstuur ik email vanuit excel.
Dit werkt naar behoren.

Mijn vraag is of het mogelijk is dat de Email hantekening m.b.v. een VBA code ook automatich geplaast kan worden, die is in gesteld in outlook.

Sub Verzenden()
Range("A1:I7").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Application.ScreenUpdating = False
Range("A1:I7").Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteValues
Selection.PasteSpecial Paste:=xlPasteFormats
Columns("A").EntireColumn.AutoFit
Application.CutCopyMode = False
With ActiveWindow
.DisplayGridlines = False
.DisplayZeros = False
End With

Application.Dialogs(xlDialogSendMail).Show
ActiveWorkbook.Saved = True
ActiveWorkbook.Close
Application.ScreenUpdating = True
Range("A1").Select
End Sub

 

[Hoornvan]

jan excel,

Dit is geen antwoord op je vraag.
Zou je de volgende keer je code willen selecteren en dan boven in het menu op # klikken, dan komt de code in een apart vak.

Dank je wel.