How to default to a specific folder in Outloook

In trying to link contacts, when I click on 'Actions', 'Link', 'Items in a contact' item, it opens a 'Link Items to Contact' window that defaults to 'Inbox'.  How can this be changed to open a 'Select Folder' window that will default to a public folder or sub-folder of my choice?  I want to eliminate the need to scroll down to another folder and then have to expand it to find a specific sub- folder.  Can a command button be used to perform this function?  If so, using VBscript, can you give me an example of how the code would be written?
LVL 3
sasllcAsked:
Who is Participating?
 
will_scarlet7Commented:
I have not tried it, but perhaps you could write a MACRO and set a command button to do this for you. Something like this:

Sub TestJournal()
  Dim myContact As ContactItem
  Dim myJour As JournalItem
  Set myContact = Application.ActiveExplorer.Selection.Item(1)
  Set myJour = Application.CreateItem(olJournalItem)
  myJour.Links.Add myContact
  myJour.Display
  myContact.Close olDiscard
  Set myContact = Nothing
  Set myJour = Nothing
End Sub

The above is excerpted from the following thread:
http://www.experts-exchange.com/Applications/MS_Office/Outlook/Q_20084556.html?query=link+items+to+contact&topics=134
0
 
will_scarlet7Commented:
sasllc, I appreciate the points. Hope my suggestion was helpful. Please feel free to ask for further clarification if needed.

God bless!
Sam
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.