define value outside module or in an *.ini file

[AlexFeddes]

Hello,
I would like to define text and values 'globally' so that they can be used throughout all modules.

Below is an example of what I want.
Preference would be to define MB1 and MB2 in an outside msgbox.ini file (C:\msgbox.ini) and let the module call for that
'[MsgBox]
'MB1 = "Test 1"
'MB2 = "Test 2"


Function ACF(MsgBox) As Boolean
'This doesn't work yet
MB1 = "Test 1" 'This line I want to get from a global variable so that it is written in the Function, but called up in the various underlying modules
MB2 = "Test 2"

End Function

Sub AA01()
MB1 = "Test 1" 'This line I actually want to get from a global variable (*.ini file) instead of declaring them in each module seperately

MsgBox MB1

End Sub

Sub AA02()

MsgBox MB2

End Sub

Sub AA03()

MsgBox MB1

End Sub

Thank you for looking into this.
Alex

 

[GlennUK]

Hello Alex,

you'd be better off posting VBA questions in the VBA forum forum707 instead of here.

That said, you may want to look at Chip Pearson's coverage of Global variables in Excel:

http://www.cpearson.com/excel/TrulyGlobalVariables.htm

Cheers, Glenn.

Beauty is in the eye of the beerholder.

 

[fumei]

It would also help greatly, when posting, if you state what application you are working with.

Word?
Excel?
Access?
Powerpoint?
some other VBA compliant app?

You can probaly go either route. Use a text file (.INI or otherwise), or a global template. It depends.

"A little piece of heaven
without that awkward dying part."

advertisment for Reese's Peanut Butter Cups (a chocolate/peanut butter confection)

Gerry

 

[AlexFeddes]

Hello Gerry,
I've posted it on another forum already - but in any case it is written in Word using VBA.

If you could help me with some simple example, I would be much obliged.

Alex

 

[fumei]

To use a .INI (or other text file in standard Section/Key value format), look up the PrivateProfileString Property in Help.

Here is also a thread that covers this a bit.

http://tek-tips.com/viewthread.cfm?qid=1516323

Preference would be to define MB1 and MB2 in an outside msgbox.ini file (C:\msgbox.ini) and let the module call for that
'[MsgBox]
'MB1 = "Test 1"
'MB2 = "Test 2"

System.PrivateProfileString("c:\msgbox.ini", _
   "Msgbox", "MB1")

returns "Test 1".

expression.PrivateProfileString(FileName, Section, Key)

Filename = C:\msgbox.ini
Section = MsgBox
Key = MB1

However, as stated, this is a VBA question and really no longer belongs in the Office forum. If you have further questions, please post to the VBA forum. I will reiterate though, that it still depends on what you are doing. Using an .INi file, or variables in a global template, both methods have their strengths.

"A little piece of heaven
without that awkward dying part."

advertisment for Reese's Peanut Butter Cups (a chocolate/peanut butter confection)

Gerry