Declarations Module

[Thompyt]

Since I fought through the Date Format Function Module I now want to figure out how to set up a declarations module for email Variables:

Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookMsg1 As Outlook.MailItem
Dim objOutlookMsg2 As Outlook.MailItem
Dim objOutlookAttach As Outlook.Attachment
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
Set objOutlookMsg1 = objOutlook.CreateItem(olMailItem)
Set objOutlookMsg2 = objOutlook.CreateItem(olMailItem)

Later one to set up normal variables

I tried the following:

Function Decaredl()
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookMsg1 As Outlook.MailItem
Dim objOutlookMsg2 As Outlook.MailItem
Dim objOutlookAttach As Outlook.Attachment
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
Set objOutlookMsg1 = objOutlook.CreateItem(olMailItem)
Set objOutlookMsg2 = objOutlook.CreateItem(olMailItem) 
End Function

and put Declared in place of the code for the email. The code couldn't find the variables.

[pbaldy]

Try

Public objOutlook As Outlook.Application

[Thompyt]

pbaldy
I tried that instead of function and got an error on the Dim ObjOutlook as vague. Changed the name to Public Email As Outlook.Application. No issues there, code ran through. In the Form_Start where I have the email code I put ' before all the Dim Outlook variables. Put Declared, Module_Declared, Module_Declared.Email, Call Module_Declared etc. - Error on Expected Procedure not Variable. Call Module_Declared = Sub or function not defined.

Changed all the Dim in the function to Public without the Function/ With the function. If I put the function in , I cannot have Public

[Micron]

If I understand your goal, I think what you want is a class module. That is, you want a custom object with custom properties that you can assign and retrieve with the Let and Get statements. Google 'class module' if you don't know what I mean.

[orange]

I recommend you review this Microsoft material and google anything you don't understand.

In your previous/related post, there was some obvious confusion with module and function.
There are several free youtube videos and articles with examples that may be helpful.
Spend some time with these. Make a simple function, and see how it is called.

The code in your post #1 is not a function.

Watch this free video by Steve Bishop, or any of the other 70 or so videos he has on MSaccess/vba

Good luck.

[Thompyt]

Orange,
Thanks for the links. I am slowly going through all the video's and learning. I haven't found the answer to the original question yet. I did fins a "work around" per se as the videos alluded to another way. Under the Option Compare Database I put Option Explicit and then all my DIM lines. This placed them all outside the modules and made them available to all the modules on the form. I did this to three forms, but there are other Single send forms where the capability is required so I had to leave them on there in the module.

[Micron]

Orange,
Thanks for the links. I am slowly going through all the video's and learning. I haven't found the answer to the original question yet. I did fins a "work around" per se as the videos alluded to another way. Under the Option Compare Database I put Option Explicit and then all my DIM lines. This placed them all outside the modules and made them available to all the modules on the form. I did this to three forms, but there are other Single send forms where the capability is required so I had to leave them on there in the module.

Technically, you did not put them "outside" the module. You put them at the module level, which makes them available to all the procedures in that module, be it a form/report module, standard module or class module. You have to be careful doing that - it's not a great idea to do it carte blanche. It may give them more exposure than what is necessary or safe, meaning they can be altered by other procedures without you realizing it. A form does not have several modules as you say, only one. It can have several procedures in that module.

I haven't found the answer to the original question yet

Ummm, my suggestion didn't even warrant a comment?

[Thompyt]

Micron,
Apologies, I did see you comment and tried it. Got more confused. I am still working on it though. I am hoping to get to it through the videos. I like the videos and it is a good resource. You and all the others have helped me very much with what I have so far. So much so I am trying to wax more and more eloquent on how I do my coding.
Probably just digging myself deeper and deeper though LOL.