Forgotten How To Add To All Modules

[Whale]

I haven't used Access for a few years now and have just finished a small project for work.



At the end (of course) I thought gee it would be a good idea to globally declare a string, assign the module name to the global string and then in error handling add this global string so I can go straight to the Module if there is an error.

I recall many years ago I was able to do something similar using a code module that walked the VBE and added the global string to every procedure however I cant recall how or where I may have got this from. Anyone got a bit of code or a direction to point me in?

Thanks

[Micron]

If I understand the need, it is easier than you make it out to be. There are a few levels of 'scope' for a variable within the code for a project. For your case, it is enough to Dim the variable a the top of one standard module in order to make it visible to the whole project so that you can use it from anywhere. However, this is seldom a great idea. Rather than repeat the reasons why, look at http://wiki.c2.com/?GlobalVariablesAreBad IMO, one of the most potentially dangerous reasons seems to be missing there: if the app errors, global variables can revert back to default values or data types. Depending on the need, a custom class object or function might be more advisable. You can expose the function globally but use the value it returns locally.

If you want me to expound a bit on variable scope, let me know.

[Whale]

Thanks...perhaps I haven't explained what I am trying to do well.

What I would like to do is declare a variable such as

g_strMN as String

This is a global variable.

Then in each module insert

Private Sub cboFilterName_Change()
g_strMN = 'cboFilterName_Change()'

Then in error code I can add:

Msgbox g_strMn & " " & Err.Number etc

Thanks

[orange]

You might want to investigate MZTools for VBA. It is a utility that can add an Error Handler to your procedure with 1 click.
Always advisable to have an error handling routine.
The MZTools for VBA utility has been updated and is no longer free. It has many useful features. I think the cost for 1 developer is about $75 US.

There is also a product called vbWatchDog from EverythingAccess (Wayne Phillips) that may be of interest.