Passing Variables from One sub to Another

[acombest]

Hello I want to pass some variables from one sub to another and after doing some research I'm still unsure on how to achieve the outcome I want.

Private Sub CommandButton2_Click()
If isLoggedIn = False then
Get LogIn(Username)
End if
MsgBox(Username)
End sub

Private Sub LogIn()
Username = Users.Cells(2, 1).Value
return Username

If I can clarify anything please let me know. Thanks for theHelp

 

[JonXL]

Private Sub CommandButton2_Click() 
Dim username As String
If isLoggedIn = False Then 
    username = LogIn
End If 
MsgBox username
End sub

Private Function LogIn() As String
Dim Users As Worksheet 
Set Users = [define your worksheet] 
LogIn = Users.Cells(2, 1).Value 
End Function

That work?

You'll need to actually define the worksheet you're referencing as Users, but the rest should work.