Avatar billede Kroaen Juniormester
26. juni 2019 - 07:58 Der er 1 kommentar og
2 løsninger

Send mail via VBA - med celle info

Hej alle,

Jeg forsøger at lave en VBA (for første gang) hvor i, jeg skal kunne trykke på en knap, så sender den en mail med data fra en specifik celle.
Det er som udgangspunkt, kun celle info den skal hente. Alt andet er skrevet direkte i makroen.

Pt. ser min makro således ud og den sender mailen som den skal.

Sub SendMail()

Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")

    Dim olMail As Outlook.MailItem
    Set olMail = olApp.CreateItem(olMailItem)
   
    olMail.To = "test1@test.dk"
    olMail.CC = "test1@test.dk"
    olMail.Subject = "test"
    olMail.Body = "Vil gerne refere til en celle her"
    olMail.Send
 

End Sub


Jeg ønsker, at olMail.body skal refere til en specifik celle.
Og jeg ønsker at sætte flere CC på end én enkelt.

Hvad skal jeg gøre? :-)
Avatar billede Kroaen Juniormester
26. juni 2019 - 08:20 #1
Når jeg skriver følgende så virker det. Men vil gerne vælge et specifikt ark, men dette kan jeg ikke få til at virke.

Sub SendMail()

Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")


    Dim olMail As Outlook.MailItem
    Set olMail = olApp.CreateItem(olMailItem)
   
   
    olMail.To = "test@test.dk"
    olMail.Subject = "test"
    olMail.Body = ActiveSheet.Range("L25")
    olMail.Send
   
   

End Sub
Avatar billede Kroaen Juniormester
26. juni 2019 - 08:24 #2
Nu virker det!

Sub SendMail()

Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")


Dim olMail As Outlook.MailItem
Set olMail = olApp.CreateItem(olMailItem)


olMail.To = "test@test.dk"
olMail.Subject = "test"
olMail.Body = Worksheets("Mail").Range("L25")
olMail.Send



End Sub


Nu skal jeg have fundet ud af, hvordan jeg opretter en knap til at aktivere makroen.
Sikke en monolog :-P
Avatar billede M.O Seniormester
29. juni 2019 - 08:35 #3
:-) du kan indsætte en figur (knap) og tildele den en makro.
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