HiFiForum.nu
Home | Forums | Profile | Register | Active Topics | Links | Members | Articles | PM | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

Private Messages
You must log in to check messages
 All Forums
 Diverse
 HiFi Off Topic - Fritt Forum
 Outlook fråga

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

Screensize:
UserName:
Password:
Format Mode:
Format: BoldItalicizedUnderlineStrikethrough Align LeftCenteredAlign Right Horizontal Rule Insert HyperlinkInsert EmailInsert Image Insert CodeInsert QuoteInsert List
   
Message:

* HTML is OFF
* Forum Code is ON
Smilies
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Clown [:o)]
Black Eye [B)] Eight Ball [8] Frown [:(] Shy [8)]
Shocked [:0] Angry [:(!] Dead [xx(] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
   

T O P I C    R E V I E W
U1 Posted - 2013/08/01 : 10:08:30
Jag vill skicka ett mail till flera mottagare utan att de andra ser att det gått till fler än dem själva. Jag vill inte använda BCC då det syns att de endast blivigt CCade, det skall se ut som om mailet endast är skickat till dem. Någon som vet hur man gör detta i Outlook?
9   L A T E S T    R E P L I E S    (Newest First)
U1 Posted - 2013/09/16 : 10:41:14
Funkar sjukt bra, nu har jag byggt vidare på detta men här är grunden:

Sub Test2()
'For Tips see: http://www.rondebruin.nl/win/winmail/Outlook/tips.htm
'Working in Office 2000-2013
Dim OutApp As Object
Dim OutMail As Object
Dim cell As Range

Application.ScreenUpdating = False
Set OutApp = CreateObject("Outlook.Application")

On Error GoTo cleanup
For Each cell In Columns("B").Cells.SpecialCells(xlCellTypeConstants)
If cell.Value Like "?*@?*.?*" And _
LCase(Cells(cell.Row, "C").Value) = "yes" _
And LCase(Cells(cell.Row, "D").Value) <> "send" Then

Set OutMail = OutApp.CreateItem(0)

On Error Resume Next
With OutMail
.To = cell.Value
.Subject = "Reminder"
.Body = "Dear " & Cells(cell.Row, "A").Value _
& vbNewLine & vbNewLine & _
"Please contact us to discuss bringing " & _
"your account up to date."
'You can add files also like this
'.Attachments.Add ("C:\test.txt")
.Send 'Or use Display
End With
On Error GoTo 0
Cells(cell.Row, "D").Value = "send"
Set OutMail = Nothing
End If
Next cell

cleanup:
Set OutApp = Nothing
Application.ScreenUpdating = True
End Sub

Se mer info i denna länk:
http://www.rondebruin.nl/win/s1/outlook/bmail5.htm
Beat Posted - 2013/09/15 : 18:13:21
Är också intresserad av det macro:t!
Pac Posted - 2013/09/15 : 16:56:50
I excel? Det där vore intressant att veta!
Gaffa Posted - 2013/09/15 : 11:45:50
Dela gärna med dig av lösningen...
Vi är fler som vill veta.
U1 Posted - 2013/09/09 : 21:08:38
Excel löste det, hittade ett macro för detta :) Blev skitbra!
EngelholmAudio Posted - 2013/08/01 : 18:00:50
Firefox + mailmerge har sett till att många distributörer och andra världen om, har fått EA-info.
tomano58 Posted - 2013/08/01 : 16:03:51
Finns ju en del program att hitta som kan göra mailutskick till en lista med mottagare och det ser ut som att de är skickade ett och ett (vilket de också är)
ztenlund Posted - 2013/08/01 : 11:35:26
Möjligen mail merge, annars får du nog leta reda på någon plugin/add-in.
tomano58 Posted - 2013/08/01 : 11:27:33
Vad jag vet så är enda sättet att använda BCC eller så skickar du dem ett och ett om det nu är så känsligt.

HiFiForum.nu © HiFiForum.nu except: Logos and Trademarks are property of their owners, Comments are property of their posters Go To Top Of Page
Denna sida genererades på 0.12 sekunder. Snitz Forums 2000