Passing variables from sub to user form

I can pass a variable from sub to sub no problem and have tried to do it the same way between a sub and user form but i keep getting the error

Compile Error:
ByRef argument type mismatch

This is the code i am using

Private Sub CommandButton1_Click()
    
    Dim click As Integer

    click = ActiveSheet.Range("Z1")
    
    click = click + 1

    ActiveSheet.Range("Z1") = click
    
    UserForm1.Show (click)

End Sub

Private Sub CommandButton1_Click()

    Dim addresses As String
    
    Select Case ComboBox1.Text
    
    End Select
    
    Me.Hide

    Call NotifyDepartments(click, addresses)

End Sub

Can someone help please