14. august 2005 - 02:11Der er
4 kommentarer og 1 løsning
email makro der henter værdier i "subject" feltet
Hejsa. Jeg sidder og har lavet en excel ark, hvor jeg har forskellige værdier jeg gerne ville kunne tilføje i et subject felt.
Jeg har kopieret dette fra en af de tidligere poster..
Sub Send_via_Outlook() Dim olApp As Outlook.Application Dim olNewMail As Outlook.MailItem
Set olApp = New Outlook.Application Set olNewMail = CreateItem(olMailItem)
With olNewMail .Recipients.Add "webmaster@chat-forum.dk" '.BCC = "Evaluering" .Subject = "Udføres" .Body = "Hermed en lille opgave til jer" With .Attachments .Add ThisWorkbook.Path & "\" & ThisWorkbook.Name End With .Save .Send End With
Set olNewMail = Nothing Set olApp = Nothing
End Sub -------------------------------- Dette virker fint nok.. Men mit spørgsmål lyder så på... Hvis jeg nu vil have at der i subject står flg.
Udføres <dato værdien af I26> <Værdi af k70> osv osv
De fleste virksomheder har efterhånden bevist, at AI virker.
Pilotprojekter leverer resultater. Medarbejdere bruger generative AI-værktøjer. Nye use cases dukker op på tværs af organisationen.
Sub Send_via_Outlook() Dim olApp As Outlook.Application Dim olNewMail As Outlook.MailItem Dim strSubject As String Set olApp = New Outlook.Application Set olNewMail = CreateItem(olMailItem) '******* strSubject = "Udføres " & Range("I26").Text & ", " & Range("K70").Text '******* With olNewMail .Recipients.Add "webmaster@chat-forum.dk" '.BCC = "Evaluering" '********* .Subject = strSubject '********* .Body = "Hermed en lille opgave til jer" With .Attachments .Add ThisWorkbook.Path & "\" & ThisWorkbook.Name End With .Save .Send End With
Hej igen og tak for hjælpen. Hvis nu at man siger at jeg har 3 kolonner. Data, Fax og mobil Hvis så at man taster i data kolonnen, så skal subject være Data, osv med fax og mobil Men hvis der står noget i bare 2 af kolonnerne, så skal der i subject stå Diverse
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.
