Advertisement
If you have a new account but are having problems posting or verifying your account, please email us on hello@boards.ie for help. Thanks :)
Hello all! Please ensure that you are posting a new thread or question in the appropriate forum. The Feedback forum is overwhelmed with questions that are having to be moved elsewhere. If you need help to verify your account contact hello@boards.ie
Hi there,
There is an issue with role permissions that is being worked on at the moment.
If you are having trouble with access or permissions on regional forums please post here to get access: https://www.boards.ie/discussion/2058365403/you-do-not-have-permission-for-that#latest

Simple VB Query

  • 14-07-2004 11:12am
    #1
    JohnnyBravo
    Closed Accounts Posts: 537 ✭✭✭


    I currently have this

    Dim myOlFolder As Outlook.MAPIFolders
    Set myOlFolder = myNameSpace.GetDefaultFolder(olFolderInbox)


    how ever i want to change it so that it is like this

    Dim myOlFolder As Outlook.Folders


    DOes anyone know what the second line equivalent is


Comments

  • #2
    Ivan Dunaev
    Closed Accounts Posts: 35 ✭Ivan Dunaev


    try this:

    Dim ol As Outlook.Application
    Set ol = CreateObject("Outlook.Application")

    Dim myFolders As Outlook.Folders
    Dim myNameSpace As Outlook.NameSpace

    Set myNameSpace = ol.GetNamespace("MAPI")
    Set myFolders = myNameSpace.Folders


Advertisement