using the same variable with its value in 2 different sub

[lezawang]

Hi
I want to use the value of variable s in first sub and in the second sub. I do not want to ask user to enter number of students again in the second sub. I asked user to enter number of students in sub1 and assigned this value to "s". So if user enter s=10 then I need to use the same value s=10 in sub2. Can I do that? Thank you

Dim s as integer
''''''''''''''''''''''''''''''''
Sub studentgrade()
    Dim x As Integer, y As Integer
    s = InputBox("number of students")
    Cells(1, 2).Value = "marks"
    For x = 2 To s
    Cells(x, 2).Value = WorksheetFunction.RandBetween(1, 100)
    Next x
End Sub
''''''''''''''''''''''''''''''''''''''''''''''''''''
Sub myresult()
    Dim x As Integer
    For x = 2 To s
    If Cells(x, 2).Value > 50 Then
    Cells(x, 3).Value = "pass"
    End If
    Next x
End Sub

 

[mumps]

I have tried what you posted and it works properly for me. Do you have any code above the line

Dim s as integer

That line must be at the very top.

 

[shg]

You've declared s twice -- once at the module level, and again in studentgrade. Remove the second declaration.

Read Understanding Scope and Visibility in Help.