Filing 'Sent' Messages in Outlook 2003

Status
Not open for further replies.
Q

QnJpZGdldA

Is there a way to prompt where I want a message saved before I hit send? I

always have to go back into 'sent items' then 'move to folder' and that is

cumbersome. Please help. Thx!
 
VBA is a bit beyond me but I can certainly try. The only info. I found on it

is only available in German though. Thanks!!!

"" wrote:


> Bridget, you wrote on Thu, 2 Apr 2009 09:59:03 -0700:
>
> > Is there a way to prompt where I want a message saved before I hit send? I
> > always have to go back into 'sent items' then 'move to folder' and that is
> > cumbersome. Please help. Thx!


> Following VBA code does it:

> http://www.outlook-stuff.com/lang-en/tips-and-tricks/programming/287-ordnerauswahl-beim-senden.html

> >

>

>

> >
 
http://www.outlookcode.com/d/code/setsavefolder.htm

"Bridget" <Bridget> wrote in message

news:C29961AF-8869-4699-A302-FCB4C67D60D3@microsoft.com...
> VBA is a bit beyond me but I can certainly try. The only info. I found on
> it
> is only available in German though. Thanks!!!

> "" wrote:
>
> > Bridget, you wrote on Thu, 2 Apr 2009 09:59:03 -0700:
> >
> > > Is there a way to prompt where I want a message saved before I hit
> > > send? I
> > > always have to go back into 'sent items' then 'move to folder' and that
> > > is
> > > cumbersome. Please help. Thx!

>

>> Following VBA code does it:
>

>> http://www.outlook-stuff.com/lang-en/tips-and-tricks/programming/287-ordnerauswahl-beim-senden.html
>

>> > >

> >

>

>>

> > >>
 
"Bridget" <Bridget> wrote in message

news:EE46273A-023D-4F2B-9787-B6BEEAA202C0@microsoft.com...


> Is there a way to prompt where I want a message saved before I hit send? I
> always have to go back into 'sent items' then 'move to folder' and that is
> cumbersome. Please help. Thx!


After composing but before sending the message you can click View>Options and

change the save folder. Not quite as cumbersome as moving it from Sent Items

later.

--
 
Hi everyone,




I successfully used the VBA code described at the following URL to select the destination folder of sent items while using Outlook 2003:




http://www.outlookcode.com/d/code/setsavefolder.htm




I was able to file outgoing messages both within my personal mailbox folder hierarchy as well as within the folder hierarchy of a mailbox I share with my coworkers (another Exchange mailbox).




After we upgraded to Outlook 2007, outgoing messages are correctly saved when I select a destination folder in my personal mailbox hierarchy, but they are no longer saved correctly when a destination folder in the shared mailbox is selected. Those messages are saved in my Sent Items folder. I have been unable to find a VBA code tweak that solves this problem (and am unsure what changed between Outlook 2003 and Outlook 2007 that would have caused it).




How can I restore the functionality I lost in the upgrade via a tweak to this VBA code?




Code:
Private Sub Application_ItemSend(ByVal Item As Object, _
   Cancel As Boolean)
 Dim objNS As NameSpace
 Dim objFolder As MAPIFolder
 Set objNS = Application.GetNamespace("MAPI")
 Set objFolder = objNS.PickFolder
 If Not objFolder Is Nothing Then
     Set Item.SaveSentMessageFolder = objFolder
 End If
 Set objFolder = Nothing
 Set objNS = Nothing
 
 
End Sub

 
 
Public Function IsInDefaultStore(objOL As Object) As Boolean
 Dim objApp As Outlook.Application
 Dim objNS As Outlook.NameSpace
 Dim objInbox As Outlook.MAPIFolder
 On Error Resume Next
 Set objApp = CreateObject("Outlook.Application")
 Set objNS = objApp.GetNamespace("MAPI")
 Set objInbox = objNS.GetDefaultFolder(olFolderInbox)
 Select Case objOL.Class
   Case olFolder
     If objOL.StoreID = objInbox.StoreID Then
       IsInDefaultStore = True
     End If
   Case olAppointment, olContact, olDistributionList, _
        olJournal, olMail, olNote, olPost, olTask
     If objOL.Parent.StoreID = objInbox.StoreID Then
       IsInDefaultStore = True
     End If
   Case Else
     MsgBox "This function isn't designed to work " & _
            "with " & TypeName(objOL) & _
            " items and will return False.", _
            , "IsInDefaultStore"
 End Select
 Set objApp = Nothing
 Set objNS = Nothing
 Set objInbox = Nothing
 
 
End Function





Hoping someone can help!




Thanks and best regards,


ACurtis802
 
I'll check on the code but it could be something with outlook... i would double check the permissions on the folder. Oh, and did you open the folders as secondary mailbox in your profile or as shared folders? Are you caching the shared folders?
 
Hi Diane,

I double-checked permissions, and nothing has changed. I am an owner. I added the other mailbox (and its folders) as a secondary mailbox, not shared folders; apologies for not understanding the difference between those two. And I do not believe I am caching the shared folders, but how would I check that?

Thanks,

Anthony
 
To check caching settings, go to tools, account settings, double click on email accounts, then More settings. Look on the second tab for cache settings.
 
Update: my settings previously had cached mode disabled, so I enabled it. The change made no difference in the behavior of the filing for the secondary mailbox. Problem remains unresolved...
 
Hi Diane,

Thank you so much. I followed the process outlined on the MS site, and this seems to solve the problem. Whew!

Kind regards,

Anthony
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
S categorizing and Filing sent mail items Outlook VBA and Custom Forms 2
D How to handle filing of emails from an Inbox Subfolder to a specific Public folder Using Outlook 1
Diane Poremsky Filing Outlook Email Messages Using Outlook 0
S Outlook 7 VBA macro for multiple filing Outlook VBA and Custom Forms 1
L Error when exporting Sent Mail to Excel Outlook VBA and Custom Forms 6
X Run macro automatically when a mail appears in the sent folder Using Outlook 5
P Search folder: all emails sent to or from a domain Using Outlook 1
L Help: set flag for sent mail to check if received an answer Outlook VBA and Custom Forms 2
S Paperclip icon shows without attachment in email under Sent folder Using Outlook 0
S Sent e-mails roll back to previous draft state Using Outlook.com accounts in Outlook 3
icacream Outlook 2021 Win 10 - Nothing goes in my Drafts or Sent items folders ! Using Outlook 1
S Adding a recipient's column to Sent folder in Outlook 2010 Outlook VBA and Custom Forms 1
J Quick steps delete original email and move reply/sent email to folder Using Outlook 2
B IMAP server rejects sent email - cannot deliver messages Using Outlook 2
S How to find emails that I sent that have not received a reply? Using Outlook 7
M Extract "Date sent" from emails (saved to folder using drag and drop) Outlook VBA and Custom Forms 1
R Sent emails show iCloud mail account not the alias Using Outlook 2
L Images not displaying in emails sent to self Using Outlook 2
S Outlook 2016 A Shortcut to recall and delete and sent message. Using Outlook 1
J Names in sent items suddenly show as Bob Smith (bobsmith@sample.com) Using Outlook 3
M Messages Intermittently Dont Arrive In Sent Items After Sending Successfully Using Outlook 4
D Outlook 2016 Outlook not saving Sent Items Using Outlook 4
A Is there an ID field you can use to pair a reply to the sent email? Outlook VBA and Custom Forms 4
T Changing Sent Items location in Outlook 2019 Using Outlook 0
S Outlook (2016 32bit; Gmail IMAP) - Save sent message to Outllook Folder Outlook VBA and Custom Forms 0
C VBA to prompt for Sent folder destination Outlook VBA and Custom Forms 3
MrMayor SENT mail not reloading to top?? Using Outlook 4
D Mail in Sent Items Gone Using Outlook 12
A calendar invites sent from Microsoft Outlook to Mac Outlook is not working Using Outlook 2
Terry Sullivan E-Mails Sent Using a Group Box Result in 70 Kickbacks Using Outlook 4
GregS Outlook 2016 Sent Mail absent from Sent Mail or Sent Items Folders Using Outlook 4
P Outlook for Mac - emails are not sent out beginning last week Using Outlook 1
J Sent Items Folder NOT Showing Correct From Email Address Using Outlook 0
J Outlook Reply > From > Other Email Address... > Address Not Showing in Sent Items... From Email Outlook VBA and Custom Forms 0
T Column to display which email alias a message was sent to Outlook VBA and Custom Forms 6
GregS Outlook 2016 Sent Items vs Sent Messages Using Outlook 2
N Disable Auto Read Receipts sent after using Advanced Find Using Outlook 4
R Outlook for Mac - Advanced Search and Tracking Sent Emails Using Outlook 0
B Outlook - Mail from safe senders list being sent to Spam Folder Using Outlook 0
N Sent emails not reflected in all IMAP Folders Using Outlook 4
L Outlook/O365 "sent on behalf" behaviour Exchange Server Administration 1
M Sent mail not showing in Sent Items folder; but they can be found with Search Using Outlook 3
H Outlook 2016 sent over 30 copies of an e-mail with attachments Using Outlook 1
W Outlook 2010 some sent items marked unread now (was Ok before) Using Outlook 0
T Outlook converts sent email to txt attachments when sync Using Outlook 0
R VBA for copying sent email to current folder under a shared mailbox Outlook VBA and Custom Forms 17
D Sort Problem with Sent Folders Using Outlook 1
oliv- determine to which address an email has been sent Outlook VBA and Custom Forms 3
GregS Many Sent Item folders Using Outlook 3
B One email cannot be sent or received (but leaves outbox!) Using Outlook 1

Similar threads

Back
Top