Hello,

question on how to declare variables.

I have something simples like this

Sub Test ()

Dim H1 As Integer

H1 = Range("B6").Value

MsgBox ("Test number: " & H1 )

End Sub

Is there an easy way to use the "H1" value without again having to declare
it?

Sub Test2 ()

MsgBox ("Test 2 number : " & H1 )

End Sub
--------------------------
thanks for the help again

Swingleft

Hi,

Am Fri, 12 Aug 2011 20:45:54 +0200 schrieb Swingleft:

Is there an easy way to use the "H1" value without again having to declare
it?

you have to declare H1 as Public:

Option Explicit
Public H1 As Integer

Sub Test()
H1 = Range("B6").Value
MsgBox ("Test number: " & H1)
End Sub

Sub Test2()
MsgBox ("Test 2 number : " & H1)
End Sub


Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2

Thanks...

"Claus Busch" schreef in bericht ...

Hi,

Am Fri, 12 Aug 2011 20:45:54 +0200 schrieb Swingleft:

Is there an easy way to use the "H1" value without again having to declare
it?

you have to declare H1 as Public:

Option Explicit
Public H1 As Integer

Sub Test()
H1 = Range("B6").Value
MsgBox ("Test number: " & H1)
End Sub

Sub Test2()
MsgBox ("Test 2 number : " & H1)
End Sub


Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2

Hi,

Am Fri, 12 Aug 2011 20:52:42 +0200 schrieb Claus Busch:

Option Explicit
Public H1 As Integer

but you have to run Test() first to initialize H1 or you have to
initialize H1 in Test2() too.


Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2

On 8/12/2011 11:45 AM, Swingleft wrote:
Hello,
question on how to declare variables.
I have something simples like this
Sub Test ()
Dim H1 As Integer
H1 = Range("B6").Value
MsgBox ("Test number: " & H1 )
End Sub
Is there an easy way to use the "H1" value without again having to
declare it?
Sub Test2 ()
MsgBox ("Test 2 number : " & H1 )
End Sub
--------------------------
thanks for the help again
Swingleft

Variable scope:

http://support.microsoft.com/kb/141693
http://www.ozgrid.com/VBA/variable-scope-lifetime.htm

"Mike S" schreef in bericht ...

On 8/12/2011 11:45 AM, Swingleft wrote:
Hello,
question on how to declare variables.
I have something simples like this
Sub Test ()
Dim H1 As Integer
H1 = Range("B6").Value
MsgBox ("Test number: " & H1 )
End Sub
Is there an easy way to use the "H1" value without again having to
declare it?
Sub Test2 ()
MsgBox ("Test 2 number : " & H1 )
End Sub
--------------------------
thanks for the help again
Swingleft

Variable scope:

http://support.microsoft.com/kb/141693
http://www.ozgrid.com/VBA/variable-scope-lifetime.htm

Thanks Mike.. these sites are very usefull

basically we need variable..............

please find the below links for more information about variable

http://www.functionx.com/vbaexcel/Lesson05.htm
http://www.ozgrid.com/VBA/variables.htm

and your code we need variable but don't need to declare

Sub Test2 ()
x = range("H1").value
MsgBox ("Test 2 number : " & x )

End Sub

On Aug 12, 11:45*pm, "Swingleft" wrote:
Hello,

question on how to declare variables.

I have something simples like this

Sub Test ()

Dim H1 As Integer

H1 = Range("B6").Value

MsgBox ("Test number: " & H1 )

End Sub

Is there an easy way to use the "H1" value without again having to declare
it?

Sub Test2 ()

MsgBox ("Test 2 number : " & H1 )

End Sub
--------------------------
thanks for the help again

Swingleft