Avatar billede Oscar560 Novice
04. november 2016 - 15:40 Der er 2 kommentarer og
1 løsning

VBA kode send pdf som email

Hej
Jeg er nybegynder i Excel, indtil videre er det lykkedes mig at oprette et VBA kode så jeg opretter PDF fil ud fra nogen valg på arket i Excel.
Det jeg ikke kan finde ud af er at i stedet for filen bliver gemt på et drev at hvert fil bliver vedhæftet i et email og fil navn kommer automatisk op som afsender navn. Nogen det kan hjælpe mig videre med dette kode:

Sub loopList()


    Dim inputRange As Range
    Dim c As Range
   
    Set inputRange = Evaluate(Range("B2").Validation.Formula1)
             
        For Each c In inputRange
       
            Range("B2").Value = c.Value
           
            pdfName = c.Value 'file name
        fileSaveName = Application.GetSaveAsFilename(pdfName, _
        fileFilter:="PDF Files (*.pdf), *.pdf")
     
            ActiveSheet.ExportAsFixedFormat _
            Type:=xlTypePDF, _
            Filename:=fileSaveName, _
            Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, _
            IgnorePrintAreas:=False, _
            OpenAfterPublish:=False

             
        Next c


End Sub
Avatar billede supertekst Ekspert
04. november 2016 - 15:57 #1
Avatar billede Oscar560 Novice
18. november 2016 - 08:59 #2
Tak for hjælpen, det var en god inspiration, det lykkedes at lave et VBA som opfyldte min ønske
Avatar billede supertekst Ekspert
18. november 2016 - 09:19 #3
Selv tak..
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester