asked on

Change the vba references for office 10 to office 365, that uses the cloud to "OWA"

Change the vba references for office 10 to office 365, that uses the cloud to "OWA" ?

Until all our users are converted over to office 365.

' create the email with the subform data
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Dim colStores As Outlook.Stores
Dim oStore As Outlook.Store
Dim oFolders As Outlook.folders
Dim oInbox As Outlook.Folder
Dim colRules As Outlook.Rules
Dim oRule As Outlook.Rule
Dim colRuleActions As Outlook.RuleActions
Dim oRuleAction As Outlook.RuleAction
Dim oMoveRuleAction As Outlook.MoveOrCopyRuleAction
Dim oFromCondition As Outlook.ToOrFromRuleCondition
Dim oSubjectCondition As Outlook.TextRuleCondition
Dim oExceptSubject As Outlook.TextRuleCondition
Dim oMoveTarget As Outlook.Folder

With MailOutLook

ste5an

hmm, what is your question? What is the problems context?

The given information is pretty vague.

For your term, they normally mean:
OWA means the Outlook Web Application UI
Cloud could indicate an off-prem Exchange
Office 365 means primarily the subscription model, then it indicates the used Office version 16 (currently, but 19 is in the pipeline).

Fordraiders

ASKER

getting undeliverable messages from outlook on CC part of the emails..

Fabrice Lambert

It sound like a typical references troubles when upgrading from Office N to Office N+1.

Try switching to late binding.

Basically:
- Declare you variables as object.
- Use the CreateObject function instead of the New keyword.
- Replace any constant by their actual values.
- Remove references.

With your sample code, the following might apply:

' create the email with the subform data
Dim appOutLook As Object        '// Outlook.Application
Set appOutLook = CreateObject("Outlook.Application")

Dim MailOutLook As Object        '// Outlook.MailItem
Dim colStores As Object        '// Outlook.Stores
Dim oStore As Object        '// Outlook.Store
Dim oFolders As Object        '// Outlook.folders
Dim oInbox As Object        '// Outlook.Folder
Dim colRules As Object        '// Outlook.Rules
Dim oRule As Object        '// Outlook.Rule
Dim colRuleActions As Object        '// Outlook.RuleActions
Dim oRuleAction As Object        '// Outlook.RuleAction
Dim oMoveRuleAction As Object        '// Outlook.MoveOrCopyRuleAction
Dim oFromCondition As Object        '// Outlook.ToOrFromRuleCondition
Dim oSubjectCondition As Object        '// Outlook.TextRuleCondition
Dim oExceptSubject As Object        '// Outlook.TextRuleCondition
Dim oMoveTarget As Object        '// Outlook.Folder

Open in new window

ste5an

Can your resolve the CC addresses without error?

Fordraiders

ASKER

i have learned its now shared email box issue between the exchange servers for 365 and office 10 .

my vba code is in access 2010 and the exchange servers are for office 365.

ASKER CERTIFIED SOLUTION

PatHartman

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

Fordraiders

ASKER

thanks all

PatHartman

You're welcome.

Change the vba references for office 10 to office 365, that uses the cloud to &quot;OWA&quot;

Change the vba references for office 10 to office 365, that uses the cloud to "OWA"