RogerJordi
Gebruiker
- Lid geworden
- 21 mrt 2019
- Berichten
- 19
Goedemiddag allemaal,
Recent een macro aangemaakt voor een Excel bestand waar ik mee werk en dit werkt prima! Deze macro voert de volgende activiteiten uit: PDF bestand maken met een titel op basis van celwaarden en wordt uiteindelijk geprint. De code ziet er als volgt uit:
Dit proces bevalt me prima, echter zou ik het ook graag automatisch willen mailen. Nu heb ik meerdere macro's gevonden met bepaalde coderingen hiervoor, echter weet ik niet of het mogelijk is om deze coderingen hierop kunnen te aansluiten. Oftewel het zojuist gemaakte / uitgeprinte PDF bestand direct te mailen als bijlage. Nu ben ik benieuwd of dit mogelijk is en hoe ik dit zou moeten aanpakken.
Zou me enorm helpen!
Met vriendelijke groet,
Roger
Recent een macro aangemaakt voor een Excel bestand waar ik mee werk en dit werkt prima! Deze macro voert de volgende activiteiten uit: PDF bestand maken met een titel op basis van celwaarden en wordt uiteindelijk geprint. De code ziet er als volgt uit:
Code:
Sub PDF()
'
' PDF Macro
'
'
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"G:\Algemeen\Orders\PDF\" & Range("K12") & " " & Range("D7") & " " & Range("D23") & " " & Range("C16") & " " & Range("C21") & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
'
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
End Sub
Dit proces bevalt me prima, echter zou ik het ook graag automatisch willen mailen. Nu heb ik meerdere macro's gevonden met bepaalde coderingen hiervoor, echter weet ik niet of het mogelijk is om deze coderingen hierop kunnen te aansluiten. Oftewel het zojuist gemaakte / uitgeprinte PDF bestand direct te mailen als bijlage. Nu ben ik benieuwd of dit mogelijk is en hoe ik dit zou moeten aanpakken.
Zou me enorm helpen!
Met vriendelijke groet,
Roger