ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   problems defining a global variable (https://www.excelbanter.com/excel-programming/337560-problems-defining-global-variable.html)

filo666

problems defining a global variable
 
Recently I have been needing to use some global variables but I dont know how
to do it, colud some one explainme how to achive this.

Also: I have a form (userform1); this form has 2 chek boxes inside a grouop
box, If chekbox1 is cheked, then I want that the variable a save the "1"
value on it (dim a as integer -- a=1) and if chekbox2 is cheked then a saves
"2", this values of "a" I use them in one of my macros after a button in
userform1 is pressed (button1--unload userform1). Now the problem; My
problem is when userform1 is unloaded, a lost is value, so I dont know which
value ; how to accomplish what I want????

sebastienm

problems defining a global variable
 
Hi,

1. Global variable: at the top of a module, before any SUb , use:
Public a as long

2. For you Userform,
-first , if either checkbox1 OR checkbox2 (but not both) can be selected ,
then use an optionbutton instead of a checkbox. Optionbuttons within a same
groupbox (or Frame) function automatically as you wish... when one is clicked
, the other one is unselected automatically with no need of code.
- now, if the purpose of your form is to return a single value (as if it
were a function), you could do the following:
In your form,add the public Function Displaywhich returns a long:
Public Function Display( ) as Long
Me.Show
If OptionButton1.Value = True then
Display=1
Else
Display=2
End If
End Function

Now from your code , instead of calling
Userform1.Show
call
dim a as Long
a = Userform1.Display( )


Regards,
Sébastien
<http://www.ondemandanalysis.com


"filo666" wrote:

Recently I have been needing to use some global variables but I dont know how
to do it, colud some one explainme how to achive this.

Also: I have a form (userform1); this form has 2 chek boxes inside a grouop
box, If chekbox1 is cheked, then I want that the variable a save the "1"
value on it (dim a as integer -- a=1) and if chekbox2 is cheked then a saves
"2", this values of "a" I use them in one of my macros after a button in
userform1 is pressed (button1--unload userform1). Now the problem; My
problem is when userform1 is unloaded, a lost is value, so I dont know which
value ; how to accomplish what I want????


filo666

problems defining a global variable
 
tanks for your answer

"sebastienm" wrote:

Hi,

1. Global variable: at the top of a module, before any SUb , use:
Public a as long

2. For you Userform,
-first , if either checkbox1 OR checkbox2 (but not both) can be selected ,
then use an optionbutton instead of a checkbox. Optionbuttons within a same
groupbox (or Frame) function automatically as you wish... when one is clicked
, the other one is unselected automatically with no need of code.
- now, if the purpose of your form is to return a single value (as if it
were a function), you could do the following:
In your form,add the public Function Displaywhich returns a long:
Public Function Display( ) as Long
Me.Show
If OptionButton1.Value = True then
Display=1
Else
Display=2
End If
End Function

Now from your code , instead of calling
Userform1.Show
call
dim a as Long
a = Userform1.Display( )


Regards,
Sébastien
<http://www.ondemandanalysis.com


"filo666" wrote:

Recently I have been needing to use some global variables but I dont know how
to do it, colud some one explainme how to achive this.

Also: I have a form (userform1); this form has 2 chek boxes inside a grouop
box, If chekbox1 is cheked, then I want that the variable a save the "1"
value on it (dim a as integer -- a=1) and if chekbox2 is cheked then a saves
"2", this values of "a" I use them in one of my macros after a button in
userform1 is pressed (button1--unload userform1). Now the problem; My
problem is when userform1 is unloaded, a lost is value, so I dont know which
value ; how to accomplish what I want????



All times are GMT +1. The time now is 12:01 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com