Hirdetés

  2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    LOGOUT

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

Új hozzászólás Aktív témák

  • #26040 enelna csendes tag
    Új Válasz #26040
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    enelna

    csendes tag

    Üdvözlök Mindenkit !

    azopi74 egyik válaszában segített valakinek ezzel makróval. Személyemre szabtam úgy ahogy én szeretném futtatni, ezzel el is fogyott a tudományom. Abban kérem a segítségeteket, hogy ez a makró minden reggel fusson le automatikusan 07 órakor függetlenül attól, hogy munkanap van e vagy nincs. A gép folyamatosan be van kapcsolva. Mit kell még beírnom és hova ?

    Sub kuldes()

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    "E:\uzemkepesseg.pdf", Quality:=xlQualityStandard, _
    IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:= _
    False

    Dim Outlook As Object, EMail As Object
    Set Outlook = CreateObject("Outlook.Application")
    Set EMail = Outlook.CreateItem(0)
    With EMail
    .to = "enelna@gmail.com; nagylaszl@fkf.hu"
    .CC = ""
    .BCC = ""
    .Subject = "üzemképesség MMSZ"
    .Body = "Szia ! A mai üzemképesség jelentés"

    .Attachments.Add "E:\uzemkepesseg.pdf"
    .Send
    End With
    Set EMail = Nothing
    Set Outlook = Nothing
    End Sub

Új hozzászólás Aktív témák