Visual Basic para Aplicaciones - Consulta paso de variables

La declaracion de variables me tiene loco!
Agradezco de antemano al que llegó a leer hasta acá
Soy bien neofito en esto del VBA y consulto para ver si estoy haciendo esto bien.

La consulta es: dado este codigo

Sub mimacro()
Dim n, i As Integer
Dim salir As Boolean
Dim Pass, uss As String /*PROBÉ DEFINIENDO PASS COMO PUBLIC Y TAMPOCO*/

i = 1
salir = True
Range("A1").Select
Show FrmPass /* Aca me muestra el formulario.. (ESTA BIEN ESTO?).. y pasa a (2) EN private ButtonIngreso_Click() */

While salir And Worksheets(1).Cells(i, 1).Value <> "fin"
If Worksheets(1).Cells(i, 1).Value = Pass Then /*(3) ACA PASS LLEGA VACIO*/

MsgBox "ACCESO CONCEDIDO", vbOKOnly + vbInformation
Desproteje
salir = False
Else
i = i + 1
End If
Wend
If salir Then
MsgBox "ACCESO DENEGADO", vbOKOnly + vbInformation
End If
End Sub

Sub Desproteje()
ActiveSheet.Unprotect (1)
MsgBox "Hoja Desprotegida", vbOKOnly + vbInformation
End Sub

/* (2) este es el codigo del form ACA CARGA LOS VALORES DE PASS Y USS BIEN DESDE EL FORM*/

Private ButtonIngreso_Click()
uss = TBUsuario.Text
Pass = TBPassword.Text /* ACA CARGA BIEN EL VALOR DEL PASS PERO EN (3) (ARRIBA)*/
Unload Me
End Sub

QUE TENGO QUE HACER PARA PASAR BIEN LAS VARIABLES ?
GRACIAS DE NUEVO!

debés declarar como públicas pero en un módulo, no dentro del formulario

Public Pass As String
Public uss As String

una cosa, por lo que veo usás los comentarios de C /* */
y también declarás
Dim n, i As Integer

en ese caso no declara dos Integer sino un Variant y un Integer
debe ser así
Dim n As Integer, i As Integer
o en una forma más corta
Dim n%, i%

Saludos desde Baires, JuanC

Mil Gracias JuanC !
Asi anduvo