Sending a test email to sender's own account.

Status
Not open for further replies.
H

Henry

I've written a program that sends an email to everyone on an Excel

spreadsheet mailing list. I want the user to be able to send themselves a

"test" mail, to confirm that the contents and attachments are correct,

before sending to the whole list. Is there a way to get Outlook to find the

current user's address to put in the To field? Something like:- Message.To =

ME, where ME is the current user's address?

Henry
 
D

Dmitry Streblechenko

Application.Session.CurrentUser.Address

Dmitry Streblechenko (MVP)

-

"Henry" <henry.best@no_way.com> wrote in message

news:EDGNl.1201$9S1.751@newsfe30.ams2...

> I've written a program that sends an email to everyone on an Excel
> spreadsheet mailing list. I want the user to be able to send themselves a
> "test" mail, to confirm that the contents and attachments are correct,
> before sending to the whole list. Is there a way to get Outlook to find
> the current user's address to put in the To field? Something like:-
> Message.To = ME, where ME is the current user's address?

> Henry

>
 
H

Henry

Thanks very much Dmitry.

Henry

"Dmitry Streblechenko" <dmitry@dimastr.com> wrote in message

news:ODrWBab0JHA.4716@TK2MSFTNGP02.phx.gbl...
> Application.Session.CurrentUser.Address

> > Dmitry Streblechenko (MVP)
>

>

>

> -
> "Henry" <henry.best@no_way.com> wrote in message
> news:EDGNl.1201$9S1.751@newsfe30.ams2...
>

>> I've written a program that sends an email to everyone on an Excel
> > spreadsheet mailing list. I want the user to be able to send themselves a
> > "test" mail, to confirm that the contents and attachments are correct,
> > before sending to the whole list. Is there a way to get Outlook to find
> > the current user's address to put in the To field? Something like:-
> > Message.To = ME, where ME is the current user's address?
>

>> Henry
>

>
>>


>
 
T

TGVvbnk

Thank You! Had problem with users not having CD.dll and this work around is

what I needed to continue in Access 2007....

'***********************************************

Public Function GetCurrentUserName() As String

On Error GoTo ErrHandler

Dim OutlookApp As outlook.Application

Dim sUserName As String

Set OutlookApp = CreateObject("Outlook.Application")

sUserName = OutlookApp.Session.CurrentUser.Name

GetCurrentUserName = sUserName

Set OutlookApp = Nothing

Exit Function

ErrHandler:

Call LogError(Err.Number, Err.Description, "modAccessControl:

GetCurrentUserName", True)

End Function

'***************************************

Sub GetUserNameFromOutlook

Dim sUser as string

sUser = GetCurrentUserName

end sub

'*************************************
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
P default font when sending email from browser Using Outlook 1
M Messages Intermittently Dont Arrive In Sent Items After Sending Successfully Using Outlook 4
O Outlook on Android: after sharing / sending a news article, draft remains open. Why? Using Outlook 1
P Sending email from outlook IMAP to GMAIL where embedded images are added as attachment Using Outlook 1
V Form data not sending for some users Outlook VBA and Custom Forms 2
L isn't there an OL add-on that flags addressee before sending Using Outlook 3
R Microsoft Outlook 2016 - Gmail not sending, asks for password for SMTP, tried different ports Using Outlook 23
A Flag Message for Follow Up after sending Outlook VBA and Custom Forms 1
D Sending email from Office 365 alias in Outlook Using Outlook 3
E Change sending account depending on Subjectline Outlook VBA and Custom Forms 0
L unblocking attachments before sending Office 365 Advanced Protection Using Outlook 0
B Outlook 2003 email sending & receiving suddenly stopped working Using Outlook 3
R Warn before sending message Outlook VBA and Custom Forms 4
HarvMan Hotmail - Sending email is undeliverable Using Outlook 4
A Sending contact vcards sends older version instead of updated version Using Outlook 4
M McAllister Outlook stops Sending/Receiving/Synching after disconnecting remote desktop session Using Outlook 2
D Adding Enterprise Exchange Email Account to Outlook Prevents Sending via Outlook.com Account Using Outlook.com accounts in Outlook 10
B When sending an email, I am showing 2 of my address's Using Outlook 1
M Auto expand Distribution List Before Sending Email Outlook VBA and Custom Forms 1
A Check for words in subject header before sending email Outlook VBA and Custom Forms 4
O Run macro automatically at sending an email Using Outlook 11
W Sending To Wrong Account Using Outlook 15
H Select Specific Account When Sending Email, Based on Current Folder Outlook VBA and Custom Forms 1
M Help sending email but removing signature via VBA Outlook VBA and Custom Forms 5
M MsgBox when not sending from specified account Outlook VBA and Custom Forms 2
A Script to fetch data from mails in restricted collection and sending them to excel Using Outlook 1
R Sending emails via Outlook XP, from Windows 10 File Explorer Using Outlook 1
L Creating drafts when I thought I was sending Using Outlook 1
C address book "when sending email" bug? Using Outlook 0
H Custom autoforwarding, sending mail through outlook office 365 Using Outlook 1
R Sending email copy (*.msg file) of sent email if subject line contains specific string. Outlook VBA and Custom Forms 1
C replace subject line generated by converting a word document to PDF and sending it to an email Using Outlook 8
A Sending Emails Through Outlook From Multiple Email Addresses Using Outlook 1
P Outlook 365 sending intermittently Using Outlook 0
C How to avoid sending mail to the wrong contact person Using Outlook 1
V iCloud Calendar invitations not sending Using Outlook 3
O Rules and Alerts for New Messages BEFORE sending Using Outlook 2
latitudeit Outlook for Android - Sending from an alias address Using Outlook 2
X Delay sending an email until the next working day (public holidays) Outlook VBA and Custom Forms 0
D Macro sending outlook template from Excel list Outlook VBA and Custom Forms 6
A How to get rid of "sending on behalf of" when sending from Outlook 2016 client Using Outlook 12
O Outlook 2013 Problems sending large mails Using Outlook 4
Diane Poremsky Automatically create a task when sending a message Using Outlook 0
P Categorise emails on sending - macro not working in Preview mode Using Outlook 1
Diane Poremsky Outlook is sending winmail.dat attachments Using Outlook 0
Diane Poremsky Select from a List of Subjects before Sending a Message Using Outlook 0
P Outlook 2010 sending safe senders email to junk box Using Outlook 8
Diane Poremsky To delay sending a message in Outlook Using Outlook 0
F Avoid sending duplicate using Outlook script Outlook VBA and Custom Forms 2
D Close Oulook after sending emails via vba without outbox getting stuck. Outlook VBA and Custom Forms 1

Similar threads

Top