Ga naar inhoud

Welkom op PC Helpforum!
PC Helpforum helpt GRATIS computergebruikers sinds 2006. Ons team geeft via het forum professioneel antwoord op uw vragen en probeert uw pc problemen zo snel mogelijk op te lossen. Word lid vandaag, plaats je vraag online en het PC Helpforum-team helpt u graag verder!


johangt

Macro Excel mail button

    Aanbevolen berichten

    Beste excel specialisten,

     

    Ik zoek een excel specialist die thuis is in macro's. Ik wil een "Sent E-mail" button aanmaken die automatisch een mail opent en het desbetreffende excel bestand in bijlage toevoegt.

     

    Desbetreffende file staat op: https://drive.google.com/open?id=1QWRV2DNGHA9vTdOtO6pLZe9ywieWCwcW

     

    Deel dit bericht


    Link naar bericht
    Delen op andere sites

    Je vraag is veel te vaag om een volledige oplossing te geven maar dit zal je al op weg helpen.

     

    Private Sub CommandButton1_Click()
        mypath = ThisWorkbook.Path & "\"
        myfilename = Sheet1.Range("B1").Value
        Application.CopyObjectsWithCells = False
        Sheet1.Copy
        Application.CopyObjectsWithCells = True
        With ActiveWorkbook
            Application.DisplayAlerts = False
            .SaveAs mypath & myfilename, 51
            Application.DisplayAlerts = True
            .Close False
        End With
        With CreateObject("outlook.application").createitem(0)
            .to = "emailadres"
            .Subject = "onderwerp"
            .body = "bijgaande tekst"
            .attachments.Add mypath & myfilename & ".xlsx"
            .display
        End With
    End Sub

     

    Deel dit bericht


    Link naar bericht
    Delen op andere sites

    Logo

    OVER ONS

    PC Helpforum helpt GRATIS computergebruikers sinds juli 2006. Ons team geeft via het forum professioneel antwoord op uw vragen en probeert uw pc problemen zo snel mogelijk op te lossen. Word lid vandaag, plaats je vraag online en het PC Helpforum-team helpt u graag verder!

    ×
    ×
    • Nieuwe aanmaken...

    Belangrijke informatie

    We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.