Script to Macro in Module

[Diane Poremsky]

That is weird. Are you putting it on a separate read page?

 

[LMS]

No....and to test the situation, I added a text boxt to it from the field list, and it's the same problem...in the new contact, it does no show the new text box...

Since I am in the Office 365 acccount using Microsoft Exchange Service, is there something not working? Or is there a limitation on the the number of things you put in a contact?

Or any other thougths to fix this, as what I learned from you re the runthis and I found out make it a Public Sub in the Outlook Session area and then the code for the script re an application, it will totally upgrade what I need.

 

[Diane Poremsky]

There is a limitation in the number of controls, but its a high number. (The exact number varies with the number of controls).

Is it published with a new version #? That can affect it, although you should be the wrong one in the designer too (if you use New item then go into designer.)

 

[LMS]

Please explain what I need to look into? I have my form that you helped me create, and I published it as a separate one to the personal folder as that way it was the same new form, but if I was working to change something, I worked from he second new form it did not affect my contacts until it worked I don't want you mean by a version number and don't don't now how to go the "into designer....If you could tell what to try in details I appreciate it much as this new update it wonderful.

 

[LMS]

I redid it thru other contact form that is the form I use....and published it.....and its working!!!!!!

 

[LMS]

I found a way to do this and wanted to let others know if this helps others:

This is what I put in TheOutlookSession area.....and the second line is a macro name from a Module so when I run the code from TheOutlookSession area it runs that the Macro of the Module, which opens up a combobox from a userform and gives me list of things from the combobox to decide to put in or run from the contact.

Public Sub runthis()

macroname

End Sub

I added a commandbutton5 to the Contact form with a caption name that shows what I want to do, and here is what I put in the Script area of the Contact form, and published it as my default form.

Sub CommandButton5_Click

Set myOlApp = CreateObject("Outlook.Application")

myOlApp.runthis

End Sub

And when I click on the CommandButton5 in any Contact, it runs the macro that was put in TheOutlookSessionArea

 

[LMS]

It was working, and now, with no changes, it is not working........what should I do as it was working perfectly

 

[LMS]

Update on this please as i works and then it says the "Object does not support this property method myOlApp.runthis" I can we fix this please?

 

[LMS]

Happy to hear back, and I recently learned from a couple of other areas, that its putting a different structure in the script, and clicking on the commandbutton in the contact runs the macro from the OutlookSession that runs the macro from the Module and opens up the Useform Commbobox. So here is the other way to do it, and will see if it never has that quick error from time to time:

Sub

CommandButton5_click



call test



end sub



sub test()



Application.runthis()



end sub

 

[LMS]

It works and then the Same error comes up: Object does not support this property method myOlApp.runthis, and later it works. What to fix please?

 

[Diane Poremsky]

object does not support this property means you are trying to do something not supported by whatever you are using. So it works the first then doesn't?

 

[LMS]

It often just works in a normal way for a lontime and then it shows up with the error. Any idea to fix ??

 

[LMS]

Any update thoughts in this area?

 

[Diane Poremsky]

No, not really. My best guess is that an object is left open somewhere along the line and repeated use of it causes problems. Or you are calling the wrong item type - like using a contact macro with a contact group or a contact macro on an email.

The code at the end of many macros that reads Set objectname = nothing is closing the objects. Not everything declared at the top of the macro needs to be set to nothing though, so I'm not sure this is the problem. The error message isn't right for this either. If it's because you are trying to use it with the wrong item type, you can add code to check for the item type, or just remember it not to use it with other forms.

 

[LMS]

As a report just in case you have more thoughts. The same macro that it run froms the macro in OutlookSessions area (that have a the script of the contact to run from the OutlookSession macro) I dragged it to the Quick Access Toolbar of the Contact form, and it works from there....and when the commandbotton re the Script does not work, and then I run that macro from the Quick Access Toolbar, I do the commandbotton again and it works....

 

[Diane Poremsky]

So the command button is dying?

 

[LMS]

Not at all.



The macro in the OulookSession is



Public Sub runthis()

macronnamefrommodule

End Sub



And the script code in the contact is:



SubCommandButton5_Click



Set myOlApp =CreateObject("Outlook.Application")

myOlApp.runthis



End Sub



And the commandbutton of the contact is the name : CommandButton5



And I drag the macro called macronamefrommodule to the QuickAccess Toolbar.



So if I click on the CommandButton in the Contact and it doesnot runs the macro from the OutlookSession called"macronamefrommodule", I run the macro from the Quick Access Toolbar,which works, and then the CommandButton click is fixed and works for awhile…