• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Automatische email genereren

Status
Niet open voor verdere reacties.

caffie

Gebruiker
Lid geworden
2 jan 2008
Berichten
291
Ik heb nu een hyperlink gemaakt in excel waarin ik een mail verstuur maar dit wil ik uitbreiden

Hyperlink ziet er nu zo uit
Mailto: zoon@hccnet.nl; mevrouw@hotmail.com
Onderwerp: vaste tekst



Ik wil een automatische mail naar 2 adressen genereren naaar me zoon@hccnet.nl en mevrouw@hotmail.com via live mail
Het onderwerp bevat vaste tekst + een waarde die opgehaald moet worden uit de laatste rij van kolom A van de eerste sheet.
Dan moet het bericht een kopie zijn van De laatste ingevulde regel van kolom A tot J uit de eerste sheet


dit mag ook in een simpele macro gebeuren.


Voor de ene een simpele klus maar ik zoek me rot wie help me op weg

Oja ik werk nog met Excel 2007


Vast bedankt
 
Ik gebruik onderstaande code voor het opslaan van de email in concepten, het is helaas niet mogelijk meteen te verzenden zonder een melding vanuit outlook dat een ander programma probeert een email te versturen.
Je kunt spelen met .send , .save en .show om te zien wat het resultaat van deze acties is.

Code:
With CreateObject("Outlook.Application").CreateItem(0)
            .To = 'hier de email adressen invullen (tussen "")            
            .CC = ""
            
            .BCC = ""
            
            .Subject = 'hier de code waar je onderwerp staat
            .Body = 'hier de code waar je tekst staat

            'add attachments
             On Error Resume Next
             .Attachments.Add (ActiveWorkbook.Path & "\OUT\" & Email_datebox.Value & "\" & Sheets("database").Range("m9").Value & ".pdf")
                                     
             .Save 'of .show .send
            
End With


edit, zie nu dat het via live mail moet.. Waarschijnlijk moet je dan bovenaan de applicatie naam aanpassen.. Nu heb je wel een start waarmee je wellicht verder kunt.
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan