Stránka 1 z 1

Excel makro - odeslat jako pdf  Vyřešeno

Napsal: 15 led 2014 10:25
od Majk1976
Dobrý den, potřebuji odeslat jeden list nebo sešit ( nebude více listů) mailem na dvě adresy. Potřeboval bych aby soubor převedl na pdf. Jelikož se tento list odesílá několikrát denně , chci to řešit makrem

Re: Excel makro - odeslat jako pdf

Napsal: 15 led 2014 10:43
od cmuch
List lze uložit do PDF TŘEBA TAKTO.
Stačí změnit cestu a název.

Kód: Vybrat vše

Sub UlozListJakoPDF()
'
    Dim cesta As String
    Dim nazev As String

    cesta = "C:\Users\Documents\"
    nazev = "Sešit.pdf"

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        cesta & nazev, Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        False
End Sub

Re: Excel makro - odeslat jako pdf

Napsal: 17 úno 2014 10:07
od Majk1976
Hodně opožděně , ale i tak veliký dík, tato rada mi usnadnila velice práci.