Not sure if this is the best way to do it but here is a way to do it:
Private Sub UserForm_Initialize()
Dim num As Integer
num = Worksheets("Data").Range("J20").Value
Label2.Caption = num
End Sub
Have a go and see how it goes
--
Steel Monke
-----------------------------------------------------------------------
Steel Monkey's Profile:
http://www.excelforum.com/member.php...fo&userid=2905
View this thread:
http://www.excelforum.com/showthread.php?threadid=57362