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